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il lettore di VR 
Vìdeoregìstrare è giovane, 
dinamico, creativo. Di cultura 
e reddito superiore alla 
media, possiede spesso più 
di un videoregistratore, oltre 
atri m pianto ht-fl e al 
computer: nel tempo libero, 
non rinuncia a viaggi In Italia 
e all'estero, e a cinema, teatro 
e spettacoli sportivi in 
genere. Usa li 
videoregistratore non solo 
per 1 programmi tv o 
preinetsh ma anche per 
riprendere i momenti felici in 
famiglia, per creare una 
videoteca personale. 
E tu, che lettore sei? 



L ’ Immaginazione 
ai potere 
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La rivoluzione d’ottobre 


Senza aver la pretesa di innescare 
cambiamenti simili a quelli avvenuti in 
Russia al l’inizio del secolo, noi , 
nel nostro piccolo... 


dì \ks vinci™ die Simonie 



telefonate sono giunte in 
Redazione in seguito all'iniziativa dì 
pubblicare articoli sullo scottante te- 
ma delle protezioni. 

Alcuni erano d'accordo* altri con- 
trari, altri ancora si dichiaravano 
scenici sul luturo del software e non 
mancava chi, arrabbiato nero, mette- 
va in evidenza l'enorme contraddi- 
zione della nostra rivista che da una 
parte pretende di ergersi a moralista 
e dall'altra accetta inserzionisti fa- 
mosi per la pirateria che praticano. 
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Senza entrare nel merito delle os- 
servazioni sull'argomento (che rima- 
ne sempre aperto) non possiamo evi- 
tare di mettere in evidenza le ultime 
due nuove iniziative che abbiamo 
deciso di intraprendere. 

La prima riguarda, appunto, la dif- 
fusione del software a basso ( issi mo) 
prezzo che. a nostro parere, è Punica 
arma valida contro la pirateria. A 
pari ire da questo mese* infatti, sarà 
possibile richiedere in Redazione un 
disco (su nastro ci è assoluta me ole 


impossibile) contenente, ogni mese, 
una quantità e qualità di software de- 
cisamente sproporzionate alla mo- 
desta cafra richiesta. 

Rinviando alla parte del fascìcolo 
che piu da vicino descrive iJ nuovo 
servizio “Directory” occupiamoci 
della seconda iniziativa di cui desi- 
deriamo parlare* 

Da una nostra indagine svolta pres- 
so alcune ricevitorìe vici Lotto (in oc- 
casionc del famoso ritardo del 34) e 
del Totocalcio, durante le giornale 




MODEM MODEMPHONE 

per tutti ì computer 
"TOTAl TELECOMMUNICATIONS" 


por COMMODORE 
C 64/128 

L. 99.000 

300 &aud cari V2l 

Fiikduphx. Innato diretto sul ompwl** Agio Did, 
Aulo Anjwtr. Complete di manuale e Supei litoti i 
geni Software t. 99 000 

Modello con occoppKìtote acustico L. I 38,000 


per COMMODORE 
PC 10 - PC 20 

im COMPATIBILI 

L. 158.000 

p*r l&M-PC 300 tìaud COTI V21. Fdl-dupb* 
Auto Dica.. Auto Answer Complelo di cavo computer 

R5232C Manuale e Super Software ASO! PftO-EZ 

L 158 000 

MODEMPHONE ACC COC lesiono 10 memof"v 

Mad MP 303 300 Baud COTI V21/MI 503 Futi 
duplex. Auto DidL Auto Amwei, Interfaccia R5232C 
Senio covo L 239.000 


MODEMPHGNE HAYES 

COMPATiBLÉ con I eli? fono 

Mod WD 1100. 

300 Baud CCiTT V2l/Bell 103. Full duplex 
1200 8aud CCITT V2 3/Bell 20? Hall duplex 
Complete di' cavo computer RS232C Manuale 

istruzioni L 325,000 

Mod WD-1300 300 3aud CCiTT V2Ì F rii duplex. 

1200 Baud CCITT V?2. Full-duplex. 
Compiete di covo computer RS232C. Manuale 
istruzioni L 535000 

SUPER MODEMPHONE HAYES 
SMARTMODEM ™ 

Mod. WO-lòOO Con telefono. 

300 Baud CCITT V2 1/Bell 103. Full duplex. 

1200 &aud CCITT V22rtell 212/A. Fj-dupb*. 

Aulo Dtal, Aulo Answer. Comalete di covo campo 
ter RS232C Manuale ulruzKXli 1. 595.000 

IVA ckIuso 

Sconti a rivenditori qualificati 

MAGNÉTO PLAST s.r.i. 

V.a leda, 8 37135 VERONA Tel 045,504491 


"critiche" del campionato, abbiamo 
osservato le cifre poderose che gioca- 
tori incalliti sono disposti a spendere 
nell'illusione di recuperarle ingigan- 
tì te. 

Ed ecco, quindi, la nostra idea: al- 
fromare la sgomento dei giochi d'az* 
zardo dimostrando, proprio col com- 
puter, che a vincere è sempre e solo 
1 organi zza loro del gioco e quasi mai 
il giocatore, se consideriamo che, per 
ogni vincitore, DEVONO esservi de- 
cine di migliaia di perdenti. 

Tratteremo programmi che, dimo- 
strando scientificamente l'assurdità 
di riporre speranze su carte da gioco 
sparse sul tavolo verde osu una palli- 


na che gira o su cavalli che (se dipen- 
desse da loro) se ne starebbero m pa- 
ce in un prato, tacciano riflettere il 
potenziale giocatore sulla prudenza 
con cui è necessario affrontare il gio- 
co, qualunque esso sia. 

E: sempre presente, purtroppo, il ri- 
schio di ottenere l'effetto contrario, 
vale a dire spingere il lettore' non* 
giocatore a rischiare ci Ire al Totocal- 
cio, al Poker oppure tentare al Lotto. 

Ma la fiducia nelf intelligenza dei 
nostri lettori ci sprona ad attendere 
listali, articoli e considerazioni da 
parte degli utenti di computer che. e 
sono tanti, la pensano come noi... 








Accetti la sfida? 

(ìli autori dd software pubblicato sul 
N.33 di CC.C* (“Ecco gli «fidanti!" 
pag. 19/24 ) che non baiino ancora rice- 
vuto il materiale promesso in premio* 
sono pregati di comunicare in Reda- 
zione il loro indirizzo coti estrema 
precisione. 

Errore in Enciclopedia 
di Routine 

□ Sul V31 (pag.93)la riga 13470 con- 
tiene un GoTo IODIO che però non esì* 
ste. A che sene quella riga dal momen- 
to che, nonostante tutto* il programma 
funziona egualmente? 

* Alla riga 13470 si perviene dalla ri- 
ga 1 3435 che ha il compito dì verifica- 
re eventuali contraddizioni tra i pa- 
rametri delle coordinate. In questo 
caso, infatti, i parametri stessi vengo- 
no alterati per evitare strani inci- 
denti. 

Il GoTo UM12Q deve quindi esser 
modificalo in GoTo 13420 per un cor- 
retto funziona mento. Nonostante 
l'errore riscontrato la routine funzio- 
na egualmente nel caso in cui non 
viene attivala la riga 13435, vale a dire 
nella quasi totalità dei casi. 

Il motivo dell'errore riscontrato de- 
riva dal fatto che i vari collaboratori, 
non potendo sapere quale sani la nu- 
merazione finale che comparirà sul- 
la rivista, inviano le vane routine nu- 
merate sempre du 10000 a 101199. In 
seguito, verificaia la loro funzionali* 
tà ed idoneità alla pubblicazione, 
modifico le prime tre cifre di ciascu- 
na riga ( I00> in quelle opportune ( 1 34 
nel caso specifico). Uno dei vantaggi 
delle ndclopedia di routine, grazie 
allo standard adottalo, è proprio 
quello di poter renumerare a piacere 
le stesse routine mod i fi cando sempli- 
ce me me le pn me t re cifre delle 1 i nee e 
degli eventuali GoTo e GoSub pre- 
senti. lasciando inalterate le ultime 
due. 


Nel caso specifico della mutine 
'Linee in bassa risoluzione", mi è 
sfuggito l'indirizzo presente nella ri- 
ga 13470 e nc approfitto per chiedere 
scusa ai lettori che si fossero trovati 
in difficoltà a causa di questa mia 
omissione 


Reperita iyvant? 

□ Affermate di non rispondere a do- 
mande già pubblicate* ma spesso ciò 
non avviene e rispondete egualmente 
affrontando argomenti già noti mentre 
trascurate* tra Fulcro, le mie doman- 
de,,, (Filippo Gl doni - Mirano) 

•Quando un argomento viene richie- 
sto nuovamente da un consistente 
numero di lettori non possiamo fare 
a meno di dedu rre che vi sia una nuo- 
va ondata "di acquirenti che si sono 
procurali la nostra rivista solo da po- 
co tempo e che non possono, ovvia- 
mente* sapere se una risposta è stala 
già pubblicata. 

Trascurare le loro legittime richie- 
ste sarebbe, quindi, ingiustificato. 

Per ciò che riguarda la tua doman- 
da, perche non l'hai riproposta? Ma- 
gari ti avrei risposto proprio in queste 
righe... 


Vedo doppio 

□ I computer Commodore possiedono 
due uscite video* una per il monitor ed 
una per il TV, E’ possibile usarle con- 
temporanea mente senza danni? (Giu- 
seppe Fugliares - Augusta) 

• I circuiti cui accenni sono sempre 
aitivi anche se non vengono utilizza- 
li. E' pertanto possibile col legare sia 
un TV che un monitor senza pericoli 
di eventuali "sovraccarichi". 

Tale sistema, anzi* è spesso usato 
negli stand di Fiere o in corsi pratici 
di computer quando sì vuol far osser- 
va re lo schermo, oltre che all opera- 


tore* anche ad un elevalo numero di 
persone, I. operatore, infatti, lavora 
col monitor posizionato davanti alla 
tastiera mentre il TV. posto in alio in 
modo opportuno, consente una co- 
moda osservazione ai partecipanti. 

Stampare in grafica 

□ Quali sono i comandi principali por 
stampare in alta risoluzione con la 

M PS/803? fi armeh 3 fora schivilo. 
Foggia) 

• E' necessario ricorrere ad un “truc- 
co" inviando particolari caratteri per 
far capire alla stampante l'intenzio- 
ne di programmare caratteri persona* 
lizzati. 

L'argomento è piuttosto lungo e (re- 
lativamente) complesso, ma ben spie- 
gato nel manuale di ìsi rii /.ione della 
macchina e di tutte le stampanti 
803/com patì bili. 

Modem, modem 
e ancora modem 

□ Numerosissimi sono ormai i lettori 
che chiedono informazioni su quali 
modem acquistare* come collegarli, 
quali sono le banche dati* quali proble- 
mi potrebbero sorgere con la SIP, 

Stiamo preparando un dossier sul- 
Fargomcnto che verrà pubblicato quanto 
prima. 

C omputer non funzionanti 

□ Molti lettori (tra cui; R. Me rozzi, F, 
Valendino) chièdono come Tare per ri- 
pristinare il funzionamento di compu- 
ter che presentano anomalie Hardware 
come* ad esempio* registratori che non 
girano* schermi “spenti", tastiere pe- 
rennemente disabilitate ed altro). Al- 
cuni inconvenienti* tra l'altro, risulta- 
no successivi a interventi pasticcioni 
con il saldatore. 
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* Non è assolutamente possibile per 
noi, come per chiunque atiro. Indivi- 
duare il guasto in base ad una sem- 
plice descrizione del difetto nè, tan- 
tomeno. suggerirne il rimedio. 

L'unica cosa da fare è quella di in- 
viare la macchina presso un centro di 
ripa razione e assistenza. Tra le nostre 
pagine vi sono i nominativi di alcuni 
inserzionisti che effettuano il seni- 
zio citato. 


Linguaggi alieni 

n Somi disponibili per il ( unirmi dure 
64 cartucce che ut ili/./ i m i un Basic di- 
verso dallo standard V2, e come procu- 
rarsele in caso affermativo? (Andrt’a 
( 'ascio, Livorno) 

* Per il (. 64 sono in commercio, da 
parecchio tempo, decine di centinaia 

di migliaia ili milioni di Basic e/o al- 
tri linguaggi (Pascal. PUÒ. Turile, Lo- 
go, fon li ed un’altra dozzina di pau- 
rosi Moni di alternative), 

11 sistema più semplice per procu- 
rarseli è quella di recarsi al negozio 
speci a lizzato più vicino, oppure di 
contattane i lettori della rubrica "Scam- 
biatevi le liste - '. Ira questi, infatti, 
moltissimi vantano una biblioteca di 
centinaia di programmi per i quali 
c è solo l'imbarazzo della scelta, 





Televideo by C/64? 

□ Ho sentito dire che la scheda Televi- 
deo non è altro che la piastra del (764. 
Se ciò non è vero, quale è il computer 
che consente il collegamento con Tele- 
video? (Davide Cri ve il otto Medigli a) 

* 1) servizio Tele video consiste in un 
gruppo di informazioni che viene 
trasmesso, insieme con gli stessi pro- 
grammi RAL e che perviene, quindi, 
alfinterno di qualsiasi TV domesti- 
co. Naturalmente tale ^contempora- 
neità" non arreca alcun fastidio alla 
normale ricezione. 

La pane “invisibile" può essere fil- 


trala, estratta e visualizzata grazie ad 
una particolare scheda elettronica 
(Televideo, appunto), governata da 
un microprocessore specifico, capa- 
ce di compiere l'operazione. 

Tale scheda, benché piuttosto par- 
ticolare e in grado di svolgere un 
compito preciso ma limitato, risulta 
semplice dal momento che vi sono 
montati, in genere, solo quattro chip 
e pochi altri elementi. Se le case co- 
struttrici inserissero al fin terno dei 
TV prodotti un intero ( 64 (tra l’altro 
difficilmente programmabile per lo 
scopo), lo stesso apparecchio coste- 
rebbe moltissimo e nessuno lo coni- 
p rerebbe. 

In conclusione: è vero che per il te- 
le video cè bisogno di una piuslra a 
microprocessore, ma è anche vero 
che questa non è un computer in 
commercio, ma una scheda elettroni- 
ca appositamente costruita. 


Accoppiamenti particolari 

□ Esiste un'interfaccia che consente di 
collegare il (764 con una macchina da 
scrivere elettronica Olivetti ? (X fessimi* 
liti tio Lodi . Sa rezzo) 

* Il C/64 dispone di vari tipi di inter- 
faccia. Escludendo quelle incorpora- 
te (seriale per tl drive e seriale per il 
registratore) ed immediatamente di- 
sponibili solo per apparecchi Com- 
modore, è possibile utilizzare inter- 
facce esterne per inserire il C/64 su 
altri "bus’ L standardizzati e molto 
diffusi. 

Tra questi ricordiamo, principal- 
mente, l'interfaccia seriale RS-232, e 
le parallele IEEE-488 e Centronics. 

Se, dunque, la macchina da scrive- 
re (o stampante) possiede uno dei tre 
connettori citati, il collegamento è 
possibile, almeno in teoria. 

Se, infatti, si vuole adoperare la 
macchina da scrivere con program- 
mi professionali (W/P. Data Base. 
Spreadsheet ed altri) non sempre il 
collegamento sembra funzionare. 
Ciò è dovuto al fatto che tali pro- 
grammi non hanno previsto la possi- 
bilità di uscita su altri bus oppure, a 
causa di alcune protezioni, alterano 
il normale funzionamento delfinvio 
dati verso la stampante. 


Prima del lacqu iste, pertanto è be- 
ne provare il computer collegato alla 
macchina da scrivere e verificarne tl 
funzionamento caricando e lancian- 
do i programmi che si intendono is- 
sare spesso. 

Per procurarsi le vane interfacce ti 
suggeriamo di contattare i nostri in- 
serzionisti che effettuano vendita per 
corrispondenza. 



Prendi due, vedi uno 

□ Si può sovrapporre la * ideata di un 
computer su quella di una normale tra- 
smissione televisiva? (Mauro Mel- 
eti fonda . Sa n ti icar tdroì 

* L necessario un circuito che si 
chiama "miscelatore video" che. nor- 
malmente. è inserito nei processori 
video: questi sono apparecchi che i- 
niziano ad avere grande diffusione 
grazie al successo di vendita dei vi- 
deoregistratori: con sentono, infatti, 
di miscelare le immagini provenienti 
da più apparecchi video (V R, teleca- 
mere. computer) e risultano indi- 
spensabili per t! cosiddetto 'montag- 

m il 

gio . 

1 processori video hanno un prezzo 
al pubblico che parte da mezzo mi- 
lione di lire circa (in su,,.) e necessita- 
no, per un funzionamento ottimale, 
di più apparecchi: monitor, video re- 
gistratori. telecamere, titolatrici elet- 
troniche eccetera. 


Io cerco la 1 11 ina 

□ Sul N,30 di C.C.C. indicale* tra i 
compimenti per realizzare la penna ot- 
tica, il F1L 7K che risulta introvabile. 
Dove acquistarlo? f Marniti Cenati, 
Biella) 

* Nei nostri progetti Hardware tenia- 
mo conto dei problemi che possono 
avere i letiori ne) procurarsi il mute- 
naie ed utilizziamo, pertanto, coni- 
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ponenti di facile reperitili ita. Alcuni 
di essi, però* sano insostituibili per 
un perfetto risultato. 

Il TIL 78 (o suo equivalente) è rela- 
tiva mente facile da trovare nei nego- 
zi specializzali e, nel malaugurato 
caso non si riesca a rintracciarli nella 
propria cittadina* è necessario (pur- 
troppo) prendere il treno e recarsi in 
un centro più grande in cut operano 
negozi più forniti. 

Hai provato* però, a contattare gli 
stessi autori dell'articolo? (Logicai 
Instruments Tel, 02/351 1871), 


Programmi protetti 

□ t ome mai alcuni programmi su na- 
stro* perfettamente Usuiti U* caricati su 
disco non funzionano? f Pietro Nicol a r 
Guardiagrefe) 

• Le protezioni agiscono, prevalente- 
mente, in due modi: il primo impedi- 
sce la copia ed ogni tentativo genera 
vari errori tira cui "Qur of Memory"). 
11 secondo* piu subdolo, la credere 
che la copia sia possibile ma, agli atti 
pratici, il programma riprodotto non 
funziona, oppure funziona male. Mi 
pare che sta quest ultimo il caso che 
ti crea problemi. 


Moda o razionalità? 

□ Ho notato che in commercio sono 
presenti due modelli di drive che diffe- 
riscono nello sportello per l'introdu- 
zione del dischetto. Vi sono altre diffe- 
renze? (( laudio De! Bianco, Firenze) 

• No: il motivo della differenza ù da 
ricercarsi nella (probabile) econo- 
mia realizzabile in fase di produzio- 
ne in serie 

Chissà* comunque, che la Commo- 
dore non si sìa voluta affiancare alla 
moda della "levetta’' abbandonando 
lo sportello* forse troppo démodé,,. 


Abbasso TAzimuth 

□ Perché i registratori non li vendono 
con razimuth regolalo in fabbrica e 
bloccato* una volta per tutte, all'altez- 
za ottimale? (Luca Berttn. Rodava} 


* In fabbrica la tesi ina viene regolata 
alla giusta posizione. Problemi di 
trasporto e cattiva manutenzione da 
parte deìTutente (leggi: urli* vibrazio- 
ni eccetera) riescono tuttavìa a spo- 
stare la testina dalla sua posizione o- 
ligi nari a. Nel caso dei computer so- 
no sufficienti pochi decimi di milli- 
metro per perdere byte durante il tra- 
sferimento dei dati, 

L opportuno forchino che consente 
Taecesso alla vite di regolazione con* 
sente* quindi, una manutenzione fa- 
cilissima. altrimenti impossibile. 


L'ultima spiaggia 

D Come si fa a conoscere rulli ma lo- 
cazione di un programma in linguaggio 
macchina? (Antonio Parziale, Brìndisi) 

9 Dopo averlo caricato da nastro (op- 
pure da disco con la sintassi: 
LOAD"NOME" JU K é sufficiente 
digitare: 

PRINT P E EK( 45 ) + RE E K(46}* 256 


11 numero che viene fuori rappre- 
senta il valore cercato. 


Errori 

□ lì terzo listato “labirinto" pubbli- 
cato sul N.29(pag 71), genera un "Ille- 
gal quantity error in 580". Dov'é Ter- 
rore? (Eh io Ducei. Firenze) 

9 Nella trasenzone die hai effettuato! 
Torniamo a ripetere che i nostri lista- 
ti, tranne rarissime eccezioni di cui 
diamo immediata notizia, sono pro- 
vati più volte prima della pubblica- 
zione e non contengono* quindi, er- 
rori di sorta. 

In generale: verifica riga per riga la 
perfetta corrispondenza tra il listato 
pubblicalo e quello trascritto NON 
chiedendo un gruppo di righe alla 
volta (tipo: LIST 100-200) ma SOL- 
TANTO una riga alla volta (Esem- 
pio: LIST 100: poi LIST 110. e cosi 
via). 

Consigliamo, soprattutto, di legge- 
re gli inserti dei numeri 31 e 32 che 
sono stati scritti proprio per spiegare 
in che modo agire quando vengono 
visualizzate segnalazioni di errore 
non previste. 
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Un$ cef e il Fondo de/te Nozioni Unite per /'infanzia. 

Creato nel 1946 per soccorrere \ bambini vittime del 
secondo confido mondiale, ora si occupo est. tesi vomente 
der paesi tn via di sviluppo, 

Oggi TUrùcet opero m lì 7 paesi dei Tef.ro Mondo con 
/obiettiva primario di dimezzare il tosso di mortalità infante 
soivomfa 7 mi Iran ' di piccole vite all'anno e proteggere fa 
salute e ia creso fa di molti milioni di alto bambini 

[‘Unii et e af olisco e i suoi fin andamenti prò vengono 
esclusivamente da' conttibuti volontari, 
li 75% de fondi provengono da stanziamenti governa fi vi, 
menfre il 25% proviene da privati. 


Allattamento al seno : fi migliore alimento possibile. 

Uno dei progrommi def/'Unicef è lo diffusione di 
melodi rei'ofr vomente semplici e a basso costo per consentire 
agir stessi genifan di ridurre della metà lì tasso di mortalità 
dei loro bambrm e dr salvarne fino a 20000 al giorno. 

Uno di quest' è l' ai fattamente ai seno, Esso garantisce 
ai bambini il migliore alimento possibile, unitamente od un 
grado elevato ai immunizzazione conico le malattie infettive 
durame r primi mesi di vi fa. 

I bambini nutriti ai seno finn no uno sviluppo piu armonioso 
e maggiori possibilità di sopravvivere. 

l impegno dei.' 'Urwcef e queilo di formare lo maggiore 






DOVE NUTRIRSI NON È UN GIOCO. 


quantità possibile di personale sanitario di basi 1 por lo 
diffusione di questi metodi e io sforzo in anziano è elevato. 
Anche fu puoi fare molto per risolvere questo prnl i forno. 

ArljJroni et bambini da aiutare sono buone ragioni per 
aiutare Tl/nicef. 

Puoi inviare il tuo contributo direttamente af Comitato 
Italiano per rUmce/ sul cJc postale n. ? 6479QOÒ, piazza 
Marconi 25, COM4 Porno. Grazie. 

Per informazioni, cerca nefl'e/enco telefonico della tua atta 
olio voce Umce£ 


Unicef - Ì9 46/1986 - Quarantanni al servizio delle madri 
e dei bambini di tatto il mondo. 



ij rupp'it thus L’Umcef ringrazia [‘Editore per questo spano giunto. 





GRAFICA 

C 128 


Graphic Expander per 

C/128 in 80 colonne 

Un 'espansione S/W a basso prezzo per 
gli utenti del potente computer grafico 

di < aitrgii» t hm//i 



IICOPY ÌO GF.T flM HflRDCOPV , . , 

... UPS 3£ll OR MPiì 803 GRrtPHIC PR I MTERS 


^^le! settembre scorso, quando allo 
SMAI K5 hi t ornimi do re presentò 
ufficialmente al pubblico italiano il 
"nuovo t om inodore I 28, v i era ima 
diffusa sete di notizie, specialmente 
tra d pubblico più giovane, che non 
vedeva I ora di esaminarlo da vi* 
eino. 

C ome sempre avviene in tali occa- 
sioni, ad (igni noima tanno eco coro* 
menti, noie di approva/ ione o severi 
rimproveri nei confronti della C asa 
costruii nve Nel caso particolare del 
C/I2H. grande stupore suscitava la 
duplice uscita video, composta. come 
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tulli oramai ben sanno, da un video 
40 colonne e da uno da 80, 

1 ale stupore era accompagnalo 
dada perplessità, che foli u naia mente 
si sarebbe rivelata infondata, dovuta 
al lì m possibilità di col legare l'uscita 
80 colonne ad un normale monitor 
composito, come quelli comunemen- 
te usati per d C (>4. 

Allo SMAU conobbi il direttore 
della Picchioli Software. Mr. Tunier, 
un simpaticissimo signore sulla cin* 
quamina al quale capitò la sventura 
di accettare un passaggio dal sotto- 
seri Ito {con stMl gialla I, dalla fiera fi- 


no a Ci insello ri)- Durante il viaggio, 
che '‘grazie” airintenso traffico durò 
ol l re due ore. ca ma rido ” We alili v e i n 
a ycllow submarine ”, Mr Turncr sot- 
tolineava pregi e difetti del C/12K, 
computer che all'epoca conosceva 
mollo meglio di noi standisti, conti* 
imamente costipili a salò ninnali per 
soddisfare le cervellotiche domande 
del pubblico. 

La mancanza che Mr lurner con- 
siderava più grave era costituita <lal- 
f impossibilita di utilizzare la grafica 
sull'uscita a NO colonne che. per defi- 
nizione e qualità, è fu sei la video 
piu interessa nie. 




GRAFICA 


Incoraggiato da Mr. Turncr e dalla 
disponibilità a fornire \c informazio- 
ni necessarie dimostrata da parte di 
Diego Perini {ragazzo di 24 anni che 
sa tulio sui disk driver e che all’epoca 
lavorava perla Comm odore), comin- 
ciai a scrivere un gruppo di routine 
grafiche per l'uscita ad 81) colonne. 

La grafica nel C/128 

La gestione dello schermo a 80 co* 
lonne è compito del'8563, processore 

video capace dì un modo testo da 80 
colonne per 25 righe e di un modo 
grafico di 640x200 punti: modo che 
può comunque essere alterato, lavo* 
rando sui numerosi e versatili registri 
di cui dispone. 

L 8563 lavora su un banco display 
Ram(o meglio: Grani) dì 16 kilobyte, 
non accessibili direttamente dalla 
Cpu 8510 che, perppter leggere ascri- 
vere in una locazione Dram, è co- 
stretta ad un protocollo stranissimo, 
che vede il processore 8563 come in* 
somiontabile e "burocratico" interme- 
diario. 


L’estensione Basic 

Graphic Expandcr 128 è un esten- 
sione Basic che rende possibile, tra- 
mile comandi analoghi a quelli desti- 
nali alla grafica 320x200, l'utilizzo 
grafico dell'8563. 1. 'utente può dise- 
gnare funzioni, istogrammi € dia- 
grammi a torta usufruendo della pro- 
fessionale grafica 640x200. Sono ì- 
noi tre previsti comandi che rendono 
possibile l’accesso da Basic al banco 
di memoria da 16 Kbyie destinato 
311*8563, ed un comando che consen* 
te dì trasportare lo schermo grafico 
gestito dal V1C sullo schermo 640x200 
gestito dal nuovo processore. 


I nuovi comandi Basic 

Passiamo ad una veloce rassegna 
dei comandi che Graphic Expandcr 
aggiunge al Basic 'ufficiale" del 
C/128: 

* Hcopy: esegue una hardcopy dello 


schermo 640x200 su stampante 801, 
803 e compatibili. Il disegno, a causa 
della maggior dimensione rispetto ad 
un 40 colonne, viene stampato in ver- 
ticale, riempendo quasi interamente 
un foglio di formato A4 (dimensioni 
output disegno: cm. 15x23}. 

* Hgraphic grpmode: se grpmode= l 
imposta il modo grafico 640x200, se 
grpmodc = 0 carica in Dram il set di 
caratteri 80 colonne, (il set caratteri 
dell'8563 è infatti memorizzato in 
Dram, ed ogni volta che si usa il bit- 
mapping è necessario cancellarlo), 
ed attiva il modo testo, 

* Hcolor frgndbkgnd; imposta il co* 
lore di scrittura (frgrul) ed il colore di 
sfondo {hkgndf 

* Hload: trasferisce lo schermo grafi- 
co 3 20x200 sullo schermo 640x200: va 
notato che tale comando espande i 
pixels dello schermo 320x200 affin- 
chè la mappa grafica visualizzata 
sullo schermo grafico 640*200 man- 
tenga le proporzioni originali, 

* Hcircle pltmode. «Lcyj 1 ; disegna un 
cerchio di centro cx,ey e raggio r; se 
pltmode^ l scrive, se pltmodc-2 in- 
verte, se pi rnu>de=0 cancella. 

* Hdraw pltmode,*. y [to xLyl |to 
x2,y2 [to xn,yn]|); se vengono o* 
messi i parametri opzionali, interni 
alle parentesi quadre, viene disegna- 
to il punto di coordinate x,y: pltmode 
ha la funzione di far scrivere, inverti- 
re o cancellare; se sono presenti para- 
metri opzionali vengono disegnate le 
n linee di cui vengono assegnate le 
coordinate degli estremi x.y xl,yl 
x2,y2 xn,yn 

* Hbox pltmode, x,y to x Uy 1 ; disegna 
il rettangolo di cui sono assegnati ì 
due spigoli x,v e xLy I 

* Hpaint pii mode,*, y; colora l'area di 
cui viene assegnato il punto interno 
x,y: se pltmode =0 l'area viene cancel- 
lata. 

* Hpoke addr,byte: esegue una poke 
sul banco Dram deU’8563. Da notare 
che i due bit più significativi dell in- 
dirizzo addr non vengonoconside ra- 


ri: inlatti i due pin "piu significativi" 
del bus indirizzi delfSMrL che po- 
t rehbe i nd i ri zza re 64 khyte I ) ra m. so- 
no addirittura scollegali sul circuito 
stampato del calcolatore’ 

* Hpeek taddr|: legge una locuzione 
del banco Dram dell'8563 e ne ritor- 
na il valore, 

* Hrdot(x,y): ritorna lo stato del pixel 
di coordinate x,y: l = acceso. 0 = .spen- 
to. 

* Hrgr(reg): legge il registro ree del 
processore video e ne ritorna il 
valore. 

* Hrgr reg,hytc: modifica il registro 
reg del f 8563, assegnandogli il valore 
byte, 

* Hscnclr: pulisce la pagina grafica 
640x200; va notato che questo co- 
mando cancella il sei di caratteri 80 
colonne, che normalmente è memo* 
rizzato nel banco Dram (16 kbytejdi 
cui necessita la grafica 640x200. 


Come procurarsi 
Graphic Espander C/128 

Assieme a Graphic espander 128 viene 
fornito un programma dimostrativo che il- 
lustra le capacità del Basic ampliato e co- 
stituisce un esempiodi come sia possibile u- 
(■lizzare I nuovi comandi. 

Sullo stesso supporlo magnetico viene i- 
n oltre Fom ilo tifi editor di cara Ile ri, che 
consente la definizione dì sei di caratteri 
personalizzali, 

l lettori interessati ad entrare in possesso 
del software in oggetto (fornito esclusiva- 
mente su disco) devono inviare la modica 
ci fra di L, 27001}^ comprensiva delle spese di 
spedizione. Non ci è possibile, infatti» invia- 
re materiale contrassegno. 

Compilale un normale modulo dì C/C 
postale indirizzando a: 

C/C postale NJW2207 
Systems Editoriale 
Viale Faroagosì*, 75 
20142 Milano 

Non dimenticate di indicare chiaramen- 
te, sul retro del modulo (nello spazio indi- 
cato con **C ausale del versamento") non 
solo il vostro nominativo completo, ma an- 
che il nome del software desiderato: 
Graphic Espander C/l 28 (disco). 
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Ptotm 


125 XR" e perfino una Fuoristrada ARO 101 Super 
tedia 4x4 

E COME SI FA? 

Per partecipare at concorso occorre acquistare un 
organo Antoni l i e spedire !a garanzia entro i 10/ 
1/1987, dopo averla fatta timbrare dal n venditore. 
Poi, finché aspettate i risultati delle estrazioni f po- 


tete sperimentare le mille possibilità degli organi 
Antondii per fare musica, da soli o con gli amici. 


ANTONELLJ CAMBIA MUSICA 

Intendiamoci, !a musica dovete farla voi, ma con 
AntoneHi é facile imparare E poc con il concorso, 
avete uno stimolo m poi 

COSA SI VINCE? 

Dunque, 50 Riproduttori m cuffia stereo (Phi- 
lips), 6 impianti HI-FI stereo, 3 Moto Garelli *T1GER 


Antonelli 


tei 071/7100184 


IWl Min H. */mtu MI wom r* 
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COMMODORE 64 

La routine “LIST”: 

come funziona e come modificarla 


Un gruppo di considerazioni che, tra l'altro, 
consentono di rimuovere un particolare tipo 

di protezione 


dì Rotarlo Mitrassi 


i siete mai chiesti che cd.su c e 
'‘dietro’* im semplice comando di 
LIST. 1 

Pei capare come funziona esami- 
niamo una per una le mi morose rou- 
tine che d Sistema Operativo del 
computer esegue quando si comanda 
1! LIST. 

li suo punto da ingresso nel SO è 
SAt/K {decimale 42652). La prima 
parte della moline, come per altri co- 
modi Basic, è La raccolta dei parame- 
tri dal lesso: vengono cioè letti i valori 
che seguono eventualmente l ‘istru- 
zione per poter fissare «limili inferio- 
re e superiore del listato. 

In assenza di parametri, tali limiti 
vengono fissati rispettiva inolile ai l'i- 
nizio del testo Basic e alla riga II ini- 
zia) 65535. In caso contrario viene ri- 
chiamata una subrouiine a SAf>13 
che ricerca le locazioni a cui iniziano 
i numeri di riga richiesti. 

U limite superiore ilei listato viene 
copialo nel puntai ore 20-21; in segui- 
to inizia il LIST vero e proprio. 

Il S.O. dapprima controlla se è 
giunto alla line del programma Ba- 
sic, altrimenti legge il numero di riga 
corrente" e lo stampa se è minore o 
uguale al limite superiore dei listato. 
Se è maggiore, il LIST viene con- 
cluso. 

Subito dopo il numero di riga viene 
inserito uno spazio e prelevato il ca- 
rattere successivo dal testo Basic rii 
registro V serve da puntatore per 
scorrere lungo) a linea Basic) Il pas- 
so successivo (analisi del carattere 
prelevato) è vettori zzato: passa cioè 
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attraverso un puntatore iti icona 
RAM (registri 774-775) che normal- 
mente punta a $A7IA, 

Quest ultima routine esamina dap- 
prima se il codice del carattere cor- 
rente è minore di 12# (hit 7 settato) e 
in tal caso lo stampa. Se è maggiore 
di 1 2K ma si trova in “modo stringa" 
viene ugualmente stampato; se infine 
è maggiore di 12® e non in "modo 
stringa", si tratta di un 'istruzione Ba- 
sic 'tokeniz/ata" (cioè codificata in 
un singolo byte) che viene decifrata e 
stampata per esteso. 

Dopo la visualizzazione, il registro 
Y viene incrementalo, c viene stam- 
pato con la stessa procedura iì carat- 
tere successivo. Quando perù si trova 
uno "zero" (segnale di fine linea), si 
passa alla lìnea seguente e si ripete 

nuovamente finterò ciclo* 


Un modo di proteggere 

Tutti sapra uno che è possibile i nse- 
rire subito dopo il comando REM al- 
cuni caratteri particolari, che non 
vengono ovviamente letti durante il 
RI IN ma vengono interpretati c 
"stampali" dal LIST, spesso con stra- 
ni risultati. 

Provate ad esempio REM Shift-À: 
questo verrà letto come istruzione 
Basic “lokcnizzata" e il listato darà 
REM ATN, 

Altri trucchi ben noti sono finirò- 
duzionedi Shift-L, che blocca il lista- 
to con 7SYNTAX ERRQR. e del 
Reverse-T (delete) che cancella il ca- 
rattere che lo precede. 

Ecco un interessante metodo per 
introdurre altri comandi nelle REM. 
Dopo REM, premete nell'ordine: 

Due doppi apici, tasto Delete, Rvs- 
On h Shiit-M, Shift-Dclete, un tasto 
colore a scelta (ad esempio; tasto 
Contrai e tasto I), e infine il tasto 
Re tu m. 

Da quel punto, il listato proseguirà 
nel colore che avrete scelto. Potete u- 
tilìzzarc i sedici colori disponibili per 
ottenere un listato in Technicolor! 

Un altro metodo per alterare il 
LISI’ è quello di modificare il punta- 
tore 774-775. Per esempio con PO- 
KE774.200 (o altri valori) si devia il 
LIST... chissà dove, e quindi, di fatto, 
lo impedisce. Per ripristinarlo, dove- 
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te riportare il puntatore al valore ' de- 
fallir con POKE774.26: POKE 775, 
167 (o più semplicemente con 
SYS58451). 

Un'altra modifica, che può tornare 
utile quando si vogliano cancellare 
da un programma molte righe conse- 
cutive, è la seguente: POKE774.0. Se 
adesso listate il gruppo di righe da c- 
lìmina re. appariranno i SOLI nume- 
ri di riga: andate col cursore sul pri- 
mo dì essi, premete più volte il tasto 
Return*,, e il gioco è latto! Per ripristi- 
nare, eseguite: Foke 774,26. 


Il programma pubblicato 

"Rem killer" è un breve programma 
in Lm. che fornisce un esempio di co- 
me si possa inserire un “wedge" nel 

comando LIST modificando il pun- 
tatore 774-775. 

i Caricate il programma in memoria* 
e il puntatore verrà automaticamente 
deviato ad una routine che parte da 
E02ED e che controlla se il carattere 
che sta per essere stampato è una 
REM (rappresentata in Basic dal va- 
lore 143), saltando, in caso affermati- 
vo, direttamente alla riga successiva. 
Ciò significa che tutte le REM, e i ca- 
ratteri che Le seguono fino alla fine 
della riga* scompariranno dal vostro 
listato sullo schermo, rendendo di 
fatto inefficace qualunque “protezio- 
ne anti-LIST" basata sui REM con 
caratteri spedali. 


10 SEn REM KILLER 
étt ; 

30 «tri BY ROSARIO mHftSSI 
40 REPI -P ItìTEJ 
45 : 

50 HEn PNUOftlL À LASCIARE QUES 
TE 

60 KEM REn PRIMA Ut LANCIARE 1 
L 

70 REM BREWISSIflD PKDtatmrtMÀ 
fl0 REM CHE Stnut PER sprqtebde 

RE 

30 RE tt ALCUNI LISTATI PROIETTI 
100 REfl RICORRENDO ÀI CARÀTTERI 
118 REh SPECIALI DOPO LE REfl 
L£0 : 

130 DÀTA tì, £01 , 143, PBfl, 10, 36, lb 
,46,6,40, 160 ,0,76,6, 167,40, 
76, £6, 167, 139, 5£7 
140 DATA 131,164,164, 165 f É37,e; 

REM LASCIATE QUESTA REn. . . 
150 POR 3C-0 TU 66 j READ ¥:POK£ 7 
49+X , V : MEXT : REFI ...E ANCHE 
QUESTA 


Dove comprare Memorai 
e ritirare l'omaggio 

BELLUNO 

5CP COMPITILA SYSTEM Vu Frifrv, 244 A 

TeJ 0437/20826 28705 

TREVISO 

FDS Via Pio A, 154 Castelfranco Vunelu 
Tri 0423/497151 ai 

TORINO 

AktL LLtr IRONICA 

Gorao Siracusa. 79 Tri DU/3798580 

t (.CORDATA SOFIWAHt HOUSE 

Via VassJ II I L an ài 29 T ri. Ù H ■ 446G8S 

ALESSANDRIA 

D0HADONI Vh Sellarle-, 39 Castrifmo 
IH fini 710151 710255 

GENOVA 

A0M COH PU TE P Pii 1ZA De Ferrar-, 2 4 /fi 
Tel. 01UZ94636 

PLAY t IMF Vid Gr annoi. 5/R lei 010/290747 

All ICA 

TAW COUPUTfNS 

Via Vittorio Veneta. 1 7 Tei. fi 1 67 509591 

SAN REMO 

F.C M Corso Cavallotti. 200 
Tel CJ1S4/B8117Ò 

VENTlMlfiLU 

CONPUIFH UFF 6 Via I renio e Trieste | 

Tri 0184/355385 

MILANO 

POLrSISTFMi Via D«na, ! 9 
Tel. 0? 2829917 ?84?B9Q< 

E ASTIATA Cenjro Di r ù ; i j i? Colteli™ 

Palagio Andfùmtruj Ingr 2 Agr.m- Brian;* 

lei 039/6379/1 

MONTA 

COMPUTERLAND! A 

Via Cor clango, 115 (ri 039/386750 
COMPII T E RL AND! A 
Vu Martin drila Liberta, 12 Lissow 
T e j 039/461362 

BRESCIA 

fts Vii Umarnaora, ]4*'B ■ Tel 030/34452 7 

CREMONA 

Il COMPUTER Via Poiri. 1 j CasaiJ , ' , ntg4i:Oii e 
Tri 0375/415&* 

PIACENZA 

PC PERSONAL COMPUTER 

Via Chiapponi. 4? Tel 0523/20626 

PARMA 

2F FA INFORMATICA Via Em-tai Lepido, 6 
Tel 0521/494358 

C0MPUT£K Pie Sorto. 5 Tel 0521/33370 

BOLOGNA 

M INIVIL LA COMPD ! f.ttS V i.i Ma u mi. 146/2 
lèi 051 347426347512 

FIRENZE 

CFNTROGRAF Vu fbetfffiaMO Giuliani. 3 46 

Tel 055/431793 4376155 

AREZZO 

OARTOGaMMa Via Trasimeno. 33 
Tel, 05757351256 

LIVORNO 

A-Stì Aljo-ìlini Sistemi Ostia ne 
Via ctrila Madama, 87 89 
Tel 0586/27358 3JDS4 

NU 

BIG BYTE COMPUTER SHOP 

Via Carla Celtico, fl H '90 T eL 050 / 4 07 86 

PERUGIA 

PUNTO BASIC Vi.i Torèlli. 7 7 Tei 0 7S ''45891 

ROMA 

METRO IMPORT ■ Vu Dundtriio, 37 
Tri 06 3607600-3608724 

AVELLINO 

FllPFLOP Via Apou, 68 Àtri p. rida 
Tri 0625/6247 12 

NAPOLI 

CARLO & CABRI/ lo SIRINO 
VuADu/,/7 Fri 081/462*63 

SALERNO 

COMPUTO SYSTEMS Via E Bottiglieri, 19 
Tel 0B9/J94491 

DUESSL INFORMATICA Vu Ùru, il 
TH. 089/2 7 16 2 8 

SASSARI 

AUDIO LINF A Via Maturi), 60 ■ Tri 0/9 29349 
BASIC S&HOP Via T(fliipiij, 6b 'A 
Tel 079.77&643 

MESSINA 

l Su Vu XXIV Maggia, 41 ■ fri, 090/716202 

PALERMO 

Fili RAND AZZO Vu Zappala, 75 
Tri 091/769348 

CALTANISETTA 

DATA SOGKAPM Vij f Palatini 84 
Tri 0934/45069 

AGRIGENTO 

PfltmSlONAL COMPUTER 
Via Cappuccini 7 Scwird 




COMPRAMI 
TI FARO’ UN REGALO! 

Acquistando due scatole di Flexible Disk MEMOREX puoi chiedere subito 

un omaggio simpatico, originale e utile: 

l’orologio impermeabile sport-time MEMOREX 
con il portamonete da polso. 

è importante scegli 

MEMOREX 

A Bunougha Camper 










GIOCHI D AZZAR DO 


Il primo listati) che |>mpom*i mo ri- 
solve uno dei principali problemi 
che ^i presentano in molti ciuchi di 
cane: 

Problema: supponendo che un maz- 
zo di carte sia composto da u n nume- 
ro eguale di cane di Cuori, Quadri, 
Fiori, Picche, quante e quali sono le 
possibili combinazioni che possono 
verificarsi estraendo a caso quattro 
carte dal mazzo? 

Se, in altre parole, da un mazzo di 
cane prendiamo quattro carte, ceco 
alcune delle combinazioni che pos- 
sono capitare: 

cuori, picche, cuori, liori 
picche, picche, fiori, picche 
fiori, cuori, cuori, picche 

C ome si può fare, dunque, per calco- 
lare quante sono, in totale, le diverse 
possibilità? 

li calcolo da effettuare in questo ca- 
so. e in tanti altri che hanno la stessa 
'matrice' 1 richiede l'esecuzione di u- 
na potenza. 

Per risolvere il problema è necessa- 
rio effettuare il seguente calcolo: 

N. combinazioni numero dei semi 
elevalo al numero di estrazioni. 

Ne deriva che: 

N, combi n «4#4 = 256 

Se. ad esempio, togliete dal mazzo 
tutte le carte di cuori ed estraete, in 
seguito, ancora quattro carte, le pos- 
si Edilità sono: 

N,com = 3#4=81 

Lo stesso concetto viene utilizzato 
anche in informatica nel risolvere un 
classico problema: 

Problema: tenendo conto che in un 
byte t - N bit = S posizioni - K "esrra* 
zìonf') ciascun bit può assumere solo 
il valore "1" ( -cuori) oppure W 
( fiori >, quante possibili combina- 
zioni di “I" e T possono verzicarsi 9 
Soluzione: 

N.com, = 2#8-256 


Il primo listato 

U mini listalo pubblicato (' Prima e- 
spe rie n za") consente di visualizzare 
le 256 combinazioni possibili del pri- 
mo problema proposto. 


R. natura, noi della Systems, siamo pacifici, prudenti e (ragionevol- 
mente) razionali. 

Con un senso di fastidio, quindi, leggiamo cne c £ gente che, a cuor leg- 
gero, sperpera centinaia di milioni sui tavoli verdi dei casinò a Ili dando 
ingenti somme al caso, alla fortuna oppure, piò semplicemente, 
alrincoscicnza. 

Più che fastidio, però, proviamo rabbia quando sui periodici specializ- 
zati ci capita di leggere inserzioni pubblicitarie che assicurano (dietro 
congruo compenso) vincite clamorose, proponendo sistemi “sicuri’ per 
realizzare elevati punteggi ai totocalcio, lotto, totip ed altri giochi 
similari. 

Inutile di re che se i sistemi proposti necessitano di computer (nella t al- 
ipede, Commodore ó4hd chiediamo in che misura un utente di calco- 
latori può credere alle promesse pubblicate. 

Da questo numero di Commodore Computer Club, pertanto, inizia li- 
na nuova "sezione" dedicala ai[ fiochi d’azzardo, 

E ciò non viene certo deciso per illudere i nostri lettori o, peggio, per "i- 
niziarti" a pratiche sciagurate come il riversare mezzo stipendio al bari 
colono. 

Nostra intenzione, al contrario, è di convincere la gente che non è pos- 
sibile escogitare un sistema “sicuro” o* comunque, tale che garantisca li- 
na vincita malematicamenie superiore alla spesa sostenuta per purteci- 
pare al gioco. 

La parte del leone, ovviamente, la prenderanno i listati che prendono 
in esame le combinazioni, permutazioni il calcolo delle probabilità, la 
valutazione del rischio e tutta quella miriade dì argomentazioni, insom- 
ma, che affrontando il problema in modo (final mente! sci enti fico, da li- 
na parte spingano il lettore à prender coscienza delle reali dimensioni 
del problema e, dall'altra, a riconoscere come irragionevole la pratica 
suicida di incrementare sempre più le somme da destinare al gioco in u- 
na rincorsa senza fine. 

E se qualche programma pubblicato sarà da voi ritenuto sufficien te- 
merne attendibile e degno di verifica, giocate puro qualche colonna a] toto- 
calcio o un terno al Lotto, ma senza uscire dai lìmiti della decenza. 

In caso di vincita, ovviamente, comunicatecelo, magari inviando in 
Redazione una bottiglia di spumante. 


Partecipazione dei lettori 

He «ori sono invitati a partecipare inviando programmi, corredati di ar- 
ticoli, entrambi scritti su supporto magnetico» na* Ito o disco, utilizzando 
uno dei seguenti Word Processor: Easy Script; Word Pro III: Word Pro 
dd Plus/4; Superscripvl28; Magic Desk; Wordcraft Vic/20. 

Gli argomenti affrontali dovranno esser relativi ai temi tipici dei giochi 
d'azzardo: calcolo di combinazioni, calcolo delle probabilità» deiermi- 
nazìone delta percentuale di vittoria tra due squadre di caldo, 
eccetera. 

Allo scopo di evitare rinvio di materiate non idoneo alia pubblicazio- 
ne, gli aspirami collaboratori sono pregati di contattare telefonicamente 
la Redazione, solo ai pomeriggio (tei .02/8467348) chiedendo delHng. 
de Si mone. 
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LI suo funzionamento è banale: do- 


po aver assegnato ai primi quattro e- 
lementi del vettore X$() i nomi, ri- 
spelli va mente, di ‘ C uori” “Picche"* 
"Quadri" e 'Fiori'', si fa ricorso a 
quattro cidi For...Nexl nidificati l'u- 


no al fin temo dell'altro. 

11 risultato consiste nella visualiz- 
zazione, su schermo, delle 256 com- 


binazioni possibili precedute dal nu- 
mero d'ordine scritto in reverse. 


La visualizzazione è piuttosto rapi- 
da e non consente, in verità, un'age- 
vole lettura. Per rallentare lo scrol- 
ling (scorrimento del video) sarà suf- 
ficiente tener premuto il tasto (Ctrl) 
(caso del Vie/20 e C/M) oppure il ta- 
stino Commodore (in basso a sini- 
stra) nel caso si possegga il C/16 o 
Plus/4. Chi possiede il C/128 può uti- 
lizzare il tasto <No Scroti), 

E possibile, comunque, inserire la 
seguente linea che ha il compito di 
introdurre una pausa dopo ogni 
visualizzazione; 


155 FOR I l TO 1000: NEXT 


Totocalcio: primo programma 


determinare il tempo necessario al 
computer per calcolare, e visualizza- 
re, le quasi ventimila colonne di nove 
simboli É T\ "2" oppure “X') 

Un altro problema 

Torniamo, ora, al programma di 
prima, relativo all'estrazione di quat- 
tro carte, e facciamo alcune consi- 
derazioni : 

Abbiamo detto, e verificato, die le 
combinazioni possibili, nel caso par- 
ticolare esaminato, sono 256. 

Un altro problema che si può risol- 
vere, riferendoci ancora all estraz io- 
ne di quattro carte, può esser quello 
dì determinare il numero di possibili 
combinazioni diverse tra loro che 
tenga no conto del numero dei semi e- 
stratti, i adipe ride ridente mente dal- 
l'ordine di estrazione. 

In parole più semplici: tra le 256 
combinazioni possibili vi sono, tra le 
altre, le seguenti: 

cuori, cuori, fiori , picche 
picche, cuori, fiori, cuori 
fiori, cuori, cuori, picche 


Le stesse considerazioni di prima 
vengono applicate nel programma 
“Combinazioni su 9 triple' che si 
propone di calcolare, c visuali /za re 
(ciascuna in orizzontale, per motivi 
di praticità), tutte le combinazioni 
possibili nel caso di una giocata al to- 
tocalcio con nove triple ìl motivo di 
limitarsi a nove triple, invece che alle 
13 che possono verificarsi ìli realtà, à 
dovuto soltanto alle limitazioni del 
computer: non è infatti possibile ni- 
dificare più di nove cidi For.^Next 
*(10 col C/16) se airititemo del “noc- 
ciolo vi sono espressioni (righe 250 
260, appunto) contenenti variabili, 
costanti oppure stringhe. 

Il calcolo delle combinazioni pos- 
sibili può comunque essere agevol- 
mente effettualo: 

N. cembri 3 triple: 

3 # 13 = 1.594323 (!) 

Il numero delle colonne possibili 
con nove triple “soltanto" (come pro- 
posto nel programma) risulta: 

3 # 9 = 19683 

Ecco giustificata, quindi, la presen- 
za delle righe 1 5i > e 280 incaricate di 


che, in effetti, sono diverse tra loro 
se si considera l ordine di estrazione. 

Se però consideriamo il numero dei 
semi presenti in ciascuna estrazione, 
le tre appena esaminate risultano e- 
guaii tra loro dal momento che vi so- 
no due cuori, un fiori cd un picche in 
ognuna di esse. 

Come calcolare, dunque, il numero 
di estrazioni diverse tra loro tenendo 
conto solo del numero dì semi pre- 
senti? 


1J terzo programma 

Questo programma (“Seconda e- 
sperienza ") risolve ti problema ac- 
cennato attraverso un procedimento 
suscettibile di miglioramenti. Nei- 
Fi n vitate ìl lettore a studiare il listato 
pubblicato, ci limitiamo ad accenna- 
re il problema e la soluzione adot- 
tata. 

AlVi memo della matrice bidimen- 
sionale Z(2S6,4) vengono depositate, 
a mano a mano clic sono elaborate, 
le singole “estrazioni ". Nella posizio- 


ne "0F di ciascun elemento, sarà pre- 
se me ìl numero di cuori estratti: ana- 


loga me me, nelle successive posizioni 
TV'2 "e "3 "di ciascun rigo della ma- 
trice. saranno presenti il numero, va- 
riabile tra zero e quattro, della pre- 
senza degli altri semi. 

Supponiamo, ad esempio, le quat- 
tro estrazioni successive: 


cuori, cuori, picche, quadri 
cuori, cuori, picche, fiori 
cuori, cuori, quadri, cuori 
cuori, cuori, quadri, picche 

M contenuto delle quattro righe di 
matrice corrispondenti saranno, di 
conseguenza: 


11 , 1,0 
2/1 AI 
3 , 0 , 1 ,0 
2 J , 1 ,0 

nelLipotesi, ovviamente, che la pri- 
ma posizione sia relativa ai cuori, tu 
seconda alle picche, la terza ai qua- 
dri e l'ultima ai fiori. 

Sì può notare subito. nelLesempio 
riportalo, che la prima e Y ultima riga, 
benché diverse come ordine di estra- 
zione. risultano eguali percontenuto 
(due cuori, un picche un quadri). 

Ad individuare tutte le nghc eguali, 
per accettare cioè soltanto la prima di 
esse e scartare tutte le altre, provvede 
la parte del programma compresa tra 
290 e 400, Si comincia confrontando 
il contenuto della prima riga della 
matrice con tutte le righe successive: 
non appena viene individuato un 
“doppione”, il programma (riga 390). 
provvede ad apporre un “1” nella 
quinta posizione della stessa riga 
della matrice. Tale simbolo (1. ap- 
punto), servirà in seguito per evitare 
confronti superflui che farebbero so- 
lo perder tempo. 

Tanto per esser più chiari, la parte 
di matrice prima vista diventa quin- 
di: 

23 J .0,0 
23,03.0 
3,03 A0 
233 Al 

Terminato il confronto delia prima 
riga di matrice con tutte le altre, un 
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paragone sarà quindi realizzalo tra 
hi seconda riga c le. successi ve; poi tra 
la terza e le successive e così via. 

Poiché il confronto (righe 360-380) 
richiede tempo, ecco spiegata futilità 
del codice l T in quinta posizione. 
Prima di effettuare il confronto, in- 
fatti, si esamina d codice della riga di 
matrice: se è presente un è inutile 
effettuare il confronto dal momento 
che la riga di matrice risulta già 
"scartata ' da un confronto avvenuto 
in precedenza Si iloti che, ovviamen- 
te, si evita di lare uri intero ciclo 
(IL.Then di riga 310) nel caso in cui 
la quinta posizione contenga, ap- 
punto, un r . 


Che cosa fa il programma 

Non appena si impartisce il Run. 
compare il messaggio X’omhi nazio- 
ne N." seguita da un valore, conti- 
nua mente aggiornato, che pane da 
zero per arrivare a 255 (perù n totale, 
appunto, di 256). 

ÀI di sotto, in rapida successione, 
sono visualizzale, una alla volta, le 
256 combinazioni possibili, In que- 
sta fase di elaborazione (righe 150- 
280) viene effettuata la somma dei se- 
mi presenti in ciascuna estrazione c 
depositala in ciascun elemento delle 
256 righe della matrice. Si ricorda 
che, al momcntodel Run, il quinto e- 
le mento di ciascuna riga di matrice 
(quello numerato con,.. 4) è sempre 
nullo. 

Subito dopo viene visualizzato il 
messaggio 'Cornbi nazione iti esa- 
me' 1 seguito dal numero della riga 
della matrice elaborata in quel mo- 
mento. In alto a sinistra compare il 
numero delle righe esaminate in ra- 
pida successione. Non appena viene 
incontrata una riga eguale a quella in 
esame, viene posto un T' nella quin- 
ta posizione c. contemporaneamen- 
te. compare il messaggio “Prossimo 
scarto' 1 seguito, appunto, dal numero 
di riga che, in seguito, non partecipe- 
rà più al confronto, velocizzando, di 
conseguenza, le operazioni, 

Dopo un certo numero di combina- 
zioni in esame comparirà anche il 
messaggio ' Combinazione scartata" 
seguita dal numero di riga che. conte- 
nendo un *T" in quinta posizione. 



. 


■= 


■■■. ■ 

Poiché desideriamo che chiunque 
(anche gli studenti delle medie) sia in 
grado di comprendere queste noie, ci 
permettiamo di ricordare il concetto 
di "potenza'* scusandoci con gli e- 
spera dì matematica 
Per “potenza'’ di un numero, dun 
que, si intende il prodotto dello stes- 
so numero, mol Upl italo per .se stesso, 
per un certo numero di volte. Ad 
esempio; 

10 elevato alla potenza di 3 signb 
fio*: 

10 * 10 * 10=1000 
7 elevato alia potenza di 4: 
7*7*7*7-2401 
| eccetera 

11 sìmbolo di "elevato a' T SÌ indica 
con una freccia in alto. Esempio: 

3 elevato alla 3 si scrive; j# 3 -27 
I computer Commodore utilizzano 
proprio questa simbologia Provate, 
ad esempio: 


«fife? 






Yv ’ . . 

... 

" ■ 'ài 




PRINT 44J-5 


o altre similari, 

Ucventuale messaggio "OverHow 
Error" indica che il numero da calco- 
lare è troppo grande. 

/ -• i •••• - - ,r • | 



non è stato presa m considera- 
zione. 

Il tempi » totale dì elaborazione c di 
poco superiore ai nave minuti e le 
cambi nazioni diverse, alla line, risul- 
tano 34 sulle 256 di partenza 


L'ultimo programma 

Il listato “Sviluppo sistema deve 
esser considerato come base di par- 
tenza per l'attento lettore. 

Si riferisce, infatti, a cinque combi- 
nazioni (da incrementare o diminui- 
re con semplici modifiche) di cui due 
triple e tre doppie. 

Per ciò che riguarda lo sviluppo dì 
una tripla non vi sono particolari 
problemi dal momento che devono 
esser setacciate tutte le combinazioni 
possibili. 

Nel caso delle doppie, al contrario, 
è indispensabile riferirsi ad una sola 
delle tre combinazioni da impostare: 

* 172 

* 1/X 

* X/2 

Nel caso di sviluppo di un sistema 
totocalcio, in l atti, la doppia 1/2, ad e- 
sempio, genera gli stessi risultati se 
considerata come 2/L 
Per evitare complicate elaborazio- 
ni si è preferito assegnare due volte il 
simbolo lt X" (riga 140); 

AS(0)="X":A$(3KX' 

In seguito si agisce sui cidi Fore.Next 
per selezionare, in caso di doppie, 
quella scelta tra le tre possibili (righe 

170-190) 


Conclusioni 

1 listati pubblicati non sono altro 
che un assaggio di ciò che, in futuro, 
vedrete su Commodore Computer 
Club, 

In attesa di vincere milioni, comun- 
que, impegnatevi a sofisticare i pro- 
grammi di queste pagine introducen- 
do altre opzioi come la memorizza- 
zione su diseoo nastro dei risultati, la 
stampa su carta, k> sviluppo di 
altre ipotesi. 

Tali operazioni, se non altro, sono 
gratis e non ce nulla da rischiare... 
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Primo programma 

100 REH I GIOCHI D'AZZARDO 
110 REM LE COMBINAZIONI POSSI tì 
ILI 

150 REM PRIMA ESPERIENZA 
130 : 

140 X$C0)~" CUORI ” : X$t 1 1 — " PICC 
HE";X$C5)“” QUADRI XSC 31- ” 
FIORI " 

150 FDR A— 0 TO 3:F0R B-0 TO 3;F 
OR C-0 TO 3 : FOR D-0 TO 3 
1B0 FRI NTCHRSC 1B1UCHRSC 146 1 ; : W- 
U+l 

170 PRINTXSC Al XSC B1XSC C1XSCD) : N 
EXTD, C, B, A 


Secondo programma 


100 

110 

180 

130 

140 

150 

160 

170 

160 

130 

195 

800 

810 


REM I GIOCHI D 1 AZZARDO 
REM IDEA BASE PER TDTQCALC 
IO: 

REH SUI LUPPO SISTEMA 


U 


1 ” : ASC 8}-” 


A$C0)-”X” : ASCI ) 

5 * J : AS C 3 } “ 1 
POR A-0 TO E: REM 
FDR B-0 IO 6: REM 
POR C-l TO B: REM 
/ 8 > 

FGR D-0 IO 1 ; REM 

/X) 

FOR E=B TD 3: REM 

/EJ 

FRI NTA3K A} ASC B ) ASC C } ASC D } AS 

CE1 ; 

PRINTCHRSC1B}UI:UJ-W+1 
NEXTE .D.C.BjA 


TRIPLA 
TRIPLA 
DOPPIA CI 

DOPPIA CI 

DOPPIA CX 


Terzo programma 

100 REM I GIOCHI D’AZZARDO 
110 REM LE COMBINAZIONI POSSIB 
ILI 


150 REM SECONDA ESPERIENZA: 

130 REM ESCLUSIONE DEI CASI EG 
UAL I 
140 : 

150 DIM ZC555, 41 : REM N.COMHIN. 
POSSIBILI 

150 XSC01-” CUORI XSC13-" PICC 
HE”:X$C51-” QUADRI XSC31-” 
FIORI PU-0 

170 PR1 NTCHRSC 1471 "COME INAZIONE 
N. " 

160 FDR A-0 TO 3: FDR B-0 TO 3:F 
OR C-0 TO 3: FOR D-0 TO 3 
160 PRINTCHRSC191 TABC ÌBICHRSC 1 
61UCKRS C 146 1 : W-Ui+l 

500 PRINT : PRINTXSC Al XSC B1 XSC C IX 
SCOI” 

510 FDR T-0 TO 3: XCT1-0: NEXT: FO 
R T-0 TO 3 

550 IF XSCT1-XSCA1 THEN XCT1-XC 
Tl+l 

530 IF XSC TI -XSC B1 THEN XCTJ-Xl 
Tl + l 

540 IF XSCT1-XSCC1 THEN XCT1-XC 
Tl+l 

550 IF XSCT1-XSCD1 THEN XCTl-Xt 
Tl + l 

560 NEXT: REM FORT-0TO3: PKINTXl 
TI ; :NEXT: PRINT 

570 FOR T-0 TO 3: ZCPU , T1-XCT1 : N 
EXT : PU-PU+1 
BB0 NEXTD, C, B, A 

590 REM ****CONFRONTO TRA PARTI 
SIMILI** 

300 TIS- "000000” 

310 FOR W-0 TD 554: PRINTCHRSC14 
71” COM.IN ESAME: ”U: IF 2 
CW.41 THEN 410 

350 R“0; FOR Y-0 TO 3: IF ZCU.Yl- 
4 THEN R-l 

330 NEXT : IF R THEN 410 
340 FOR X=UI+1 TO 554 : U=0 ; PRI NI C 
HRSC191X 

350 IF ZCX.41-1 THEN PRINTCHRSt 
161CHRSC 17 l”COMB .SCARTATA: ” 
X : GOTO 400 
360 FOR Y-0 TO 3 
370 IF ZCiit , Yl-ZCX , Y1 THEN U-U+l 
380 NEXTY 
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330 1F U-4 THEN FRI NTCHRK 13DLH 
RSC 175CHRSC 17J "PROSSIMO SCA 
RIO: “X: ZCX , 43-1 
400 nextx 

410 NEXTUJ; FRI NT "TEMPO TRASCORSO 
: "T I 3> : REM 3 MIN 6 SECONDI 
430 FRINÌ "PER ESAMINARE TUTTE L 
E POSSIBILI CDflB INAZIONI PR 
EMI <RETURN>” 

430 SET A$:IF Ai-"" THEN 430 
440 IF ASC C A$ ) < > 1 3 THEN 430 
450 X"0:FOR PU-0 TO 355: IF ZCFU 
,41 THEN 470 

460 PRINTCHRSC ltìlPU; : FOR T-0 TO 
3: FRlNTCHR*tl46JZCFU, TI ; :N 
EXTT: PRINT: X-X+l 
470 NEXTPU: PRINT : PRINT'’N .TUTALE 
COMBINAZIONI DIUERSE-"X 
430 END 

Quarto programma 

100 REM TOTOCALCIO: 

110 RE H N . I CITALE DI CUneiNA^IG 
NI 


120 REM tSU 3 TRIPLE! 

130 ; 

140 P»SC0)“”X" : ASt 1>-”1 ,p : A*t2>- M 
2" : X-l 

150 TI $-”000000” 

160 FDR A-0 IO 2 : REH PARTI Ifi N 

, 1 

170 FDR S-0 TD 2 
100 FDR C-0 TO 2 
150 FDR D“0 IO 2 
FDR E-0 TD 2 
210 FDR F-0 TU 2 
220 FDR G-0 TD 2 
230 FDR H-0 TO 2 

240 FDR 1-0 TD 2 : REfl PARTITA N 
. 9 

250 PR I NTA$C A 1 A$t B ) ASi t C ) A$ t DJ A$ 
C E 1 ; 

260 PRINTA$<FlA$lG>ASCHJASt I !CH 
RifiC 10 1 X 

270 X-X+ 1 1 NEXT I b, F, E t O s C t B, A 
200 PRINT "TErtFD TRASCORSO ”TI$ 


FINALMENTE!!! 

FINALMENTE È USCITO IL LIBRO TANTO ATTESO 

OA NOI TUTTI! 


f i Un libro di circa 40D pagine di- 

■'J\ - verso dagli altri smora usciti, un 

[ £ *1 tibro che fa capire come tu n zio- 

na veramente il tuo Commodore 
64 o 1 26 . 

Per anni ci hanno raccontalo che per programmare in linguaggio macchina 
è indispensabile fai uso deir« assembler ». Ma usare (assembler è difficile 
lungo e noioso: a parte le sigte cosiddette mnemoniche che mnemoniche 
non sono alfalto, c'è tutta la storia dei numeri esadecimali e poi. ma in- 
somma, non si può propr-o programmare « direttamente * in linguaggio mac- 
china, magari facendo uso dei DATA? Certo che si puòi Naturalmente oc- 
corre conoscere il significato dei 151 numeri che costituiscono le «parole» 
del linguaggio macchina e di clip solo una ventina sono usati frequentemen- 
te, In questo libro di circa 400 pagine troverete il significato e l'uso di questi 
151 numeri e centinaia di routine in linguaggio macchina che vi dimostre- 
ranno quanto sia facile la programmazione diretta nella stessa lingua del vo- 
stro computer Questo libro non è solo il «vocabolario» del linguaggio mac- 
china ma anche una guida sicura per una celere programmazione. 

Per ricevere il libro inviare un vaglia postale, un vaglia telegrafico o un asse- 
gno bancario di Lire 30,000 comprensive di IVA e spese postali, intestato a: 

Società Editrice » Linguaggio Macchina » s^a.s. do Studi Professionali 
Centralizzati, Corso Garibaldi, 95 - 82100 Benevento 


MH1PDO CAUIJQ 


IL VERO 


LINGUAGGIO MACCHINA 


DEL COMMODORE 64 




GIOCHI D’AZZARDO 
QUALSIASI COMPUTER 



Sviluppo di sistemi 

condizionati 


Come estrarre da un ‘'sistema” per Totocalcio, 
Totip, Enalotto e similari solo le coionne che hanno la 

massima probabilità di vittoria, escludendo tutte le altre 


di Antonio Pastorelli 
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I sistemi condizionali sono quei si* 
sterni basali su dati statistici. 

Esaminando le colonne vincenti, 
nella storia del Totocalcio, si può no- 
tare che il numero di segni “1“ r 'X*'e 
‘ T\ si aggira, salvo eclatanti eccezio- 
ni, intorno a intervalli piuttosto 
ristretti 

Ad esempio il numero dì segni '*2” 
presente in una colonna vincente è 
sempre limitato: raramente si realiz- 
zami piu di quattro vittorie fuori 
casa. 

Cosi come per il numero dei segni, 
sì può osserv are clic non compaiono 
mai, salvo casi eccezionali, (1 segni 
"I “consecutivi come pure 3 segni "2' 
l'uno di seguito all'altro. 

1] programma TOT I >. permette, 
partendo da un sistema-base prede- 
terminalo dall'utente, di eliminare, 
tra tutte le colonne possibili in teoria, 
quelle che non soddisfano determi- 
nate condizioni relative al numero 
minimo e massimo dei segni, e alla 
consecutivi tà. 

Riferendoci, ad esempio, ad un 
pronostico relativo a due incontri di 
calcio, il cui risultato è del tutto incer- 
to, è indispensabile assegnare due tri* 
pie al sistema base. 

Nonostante i due incontri siano del 
tulio incerti, possiamo però ragione- 
volmente stabilire che non può veri- 
ficarsi l'evento di due pa reggi in con* 


Nel digitare ri^be di programma ba- 
sic che contengono istruzioni DATA, 
è piuttosto tacite incorrere in erro r di 
digitazione Supponiarro t^e uri i po- 
tete linea basic numerata con 1200 
debba contenere i tre valori 123 
456.709 Ecco alcuni esempi di erro- 
ri piu frequentemente commessi 

1200 DATA, 123 456 709 

C è una virgola dopo la parola 
DATA' I datilettf dal computer so- 
no, m questo caso, quattro 0, 123. 
456 789 Se, infatti non figura alcun 
carattere dopo I istruzione DATA.au 
tom aticamente viene assunto tl valo- 
re nullo (0} 

1200 DATA 123 456.709, 

In questo caso, dopo il numero 
789 H computer, grazie alia presen- 
za della virgola erroneamente inseri- 
ta, "crede ’ che ci sia un altro valore 
e, non trovandolo, lo assume come 
nullo fO) 

1200 DATA 1234,56,789 

La virgola è posizionala mate, vale 
a dire dopo il carattere 4 1 e non 
dopo il carattere "3’ P II computer non 
può sapere se il valore esatto è 123 
oppure 1234 e individuare un errore 
in questo caso risulta piuttosto 
laborioso 




temporanea: siamo cu rivinti che al- 
meno una delle quali io squadre vin* 
cu la partita i al unissimo un solo 
pareggio) 

Come fare, dunque, se m vuole pre- 
vedere un qualsiasi risultalo, per j 
due incontri accennati, eliminando 
solo hi possibilità che in entrambi 
si pareggi? 

Il problema è risolto dai program- 
ma pubblicalo in queste pagine gra- 
zie all opzione delle t olonne impos- 
sibili'; 

Questa permette di di minare dallo 
sviluppo del sistema le colonne con 
determinati risultati indipendente- 
mente dalle altre condì /ioni imposte. 
Nel caso esposto, nel sistema-base 
compariranno due triple, e in più vi 
sarà una colonna impossibile che 
contiene, in corrispondenza dei due 
incontri, due segni \ ", che ricorderà 
al calcolatore di scartare le colonne 
contenute noi sistema che eventual- 
mente prevedano il pareggio m en- 
trambi gli incontri. 


I programmi 

il programma, in realtà, è diviso in 
due parli: TOT 13 e DISPLAY. 

TOT 1 3 provvede a I lo ss il appo \ ero 
e proprio del sistema e a memorizza- 
re le colonne selezionate sui supporti 
dì massa (nastro o disco). In seguito, 
con IMSPAY, si visualizzeranno con 
comodo, su schermo, le colonne 
valide. 

Tale soluzione è stala adottata per- 
che, in ceni casa il numero di colon- 
ne può esser rilevante. L'utili/zatoic, 
dal momento che deve trascrivere a 
mano sulla schedina (purtroppo) 
ciascuna colonna elaborala, porreb- 
be decidere dì effettuare la trascrizio- 
ne In più riprese. 

C ome utilizzare 

Tot 13 

Dopo averlo caricato c lanciato le 
atteso qualche secondo), verrà chie- 
sto il sistema-base, al quale bisogna 
rispondere tenendo presente che le 
varianti vanno introdotte mantenen- 
do l'ordine di priorità ilei segni (prò 
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irm il segno ”1 ", poi l 'X” quindi il 
T); ad esempio iì computer accetta 
la variante H X2" e rifiuta M 2X” Esem- 
pio di videuta: 

SISTEMA-BASE 
I? 1 

y> ■) 

3? I 

4? 1 
57 IX 
6? X 
77 X 
8? 1 X 
9? X 
IO? I 
11? ! 

1 2? X2 
1 3? 1 X2 

Viene poi richiesto, per ognuno dei 
tre segni, il numero minimo e massi- 
mo di presenze accettate per ogni co- 
lonna elaborata. Esempio: 

numero segni 

1 -DA? 5 

1- A? 7 
X-DA? 3 
X-A? 5 

2- DA? 1 
2- A? 3 

Successivamente bisogna indicare 
la consecutivi^ massima (cioè quan- 
ti segni uguali di seguito, al massimo, 
possono presentarsi). Esempio: 

NUMERO MAX SEGNI 
CONSECUTIVI 
K’ONS MAX? 3 
X-CONS MAX? 5 
2-CONS MAX? 1 

A questo punto il computer chiede 
se si vogliono inserire colonne-impos- 
sibili: rispondendo negativamente 
INI il programma inizierà a svilup- 
pare il sistema; in caso contrario bi- 
sognerà inserire da una lino a cinque 


colonne impossibili. Se si sbaglia, si 
può rispondere alla prima con (Re- 
turn) e poi con il tasto asterisco (*}. 

Alle colonne impossibili bisogna 
rispondere con return in corrispon- 
denza dei pron ostici che non interes- 
sano. e mettendo il segno che non de- 
ve comparire nelle colonne valide, 
per gli altri. 

Dopo aver inserito la prima colon- 
na impossibile, premendo (*) inizia 
1 elaborazione, mentre premendo un 
qualsiasi altro tasto si passa a quella 
successiva (ripetiamo che se ne pos- 
sono inserire al massimo 5). 

Una nota per i possessori di C/16 e 
Plus/4: durante la fase di sviluppo 
l'i rn magi ne video scompare (come 
quando si usa il registratore); questo 
perchè il computer non dovendo ge- 
stire il video, avrà un risparmio in ve- 
locità di esecuzione del 33,5% 

Il lavoro di selezione delle colonne 
valide risulta piuttosto veloce dal 
momento che è scritto in linguaggio 
macchina, A questo punto potete de- 
cidere se registrare le colonne valide 
(premendo “S” alla domanda "Regi- 
stri?"), oppure di visulaizzarle subito 
in caso di risposta negativa. Potete, 
naturalmente, sviluppare di nuovo il 
sistema, cambiando i condiziona- 
menti (per tentare di ridurre il nume- 
ro eventualmente eccessivo di colon- 
ne), o di sviluppare un altro sistema. 

E' importante sottolineare che il li- 
te sequenziale automaticamente ge- 
nerato ha, come nome. ‘TOT” (vedi 
nga 740) eventualmente meni i fica bi- 
le a piacere. Crii utilizzatori del disco 
non potranno, quindi, scrivere più di 
un file per ciascun disco a meno di 
non cambiare il nome del file stesso 
prima di far ripartire il programma. 

Si è preferito, infatti, evitare il ricor- 
so al comando della famigerata 
"chiocciolina" che, come è noto, può 
provocare guai nella directory. 


Ricordiamo, inoltre, clic alcune ri- 
ghe devono esser trascritte ricorren- 
do alle abbreviazioni dei comandi 
Basic per evitare di "uscire" dai limiti 
degli 80 caratteri consentiti. 


Come si utilizza Display 

Con DISPLAY si caricano in me- 
moria le colonne precedentemente 
registrate, in modo da visualizzarle 
sullo schermo. 

Nel copiare le colonne sulle schedi- 
ne, vi aiuterà la freccetta posta sotto 
di esse, controllabile mediante i tasti- 
cursore. 

Il programma gira su: VK>20+esp. 
min HK. C-16, C-64, Plus/4, C-12S. 


Note per gli esperti: 

Il file che contiene le colonne vin- 
centi è formattato nel modo seguen- 
te: contiene come primo dato il nu- 
mero delle stesse, seguito dal blocco 
consecutivo dì tutte le colonne elabo- 
rate. 

Airi memo dello stesso file, il nu- 
mero l corrisponde al simbolo T”, il 
2 al pareggio {X)ed il 3 alla vittoria 
fuori casa (2), 


Avvertenze 

F? Fucile “ funi prendere la ni ami” giocando 
al Totocalcio. Ricordiamo, pertanto* che 
non è assolutami ut? possibile escogitare 
un sistema * ‘certo”: a vincere è sempre e so- 
lo Porga ni /latore (leggi CONI e 5 lato). 
Sconsigliamo divamente, quindi, di dedica- 
re grosse cifre a quello che dovrebbe esser 
considerato solo un gioco e che, purtroppo, 
viene invece reclamizzato dal mass media, 
spesso anche in modo subliminale, Incorag- 
giando la gente a rischiare somme consi- 
stenti, 


le© reh IDT-T3 

110 Stri PER QUALSIASI COmODQRE 
1£0 REFI BY ANTONIO PASTORELLI 

1£5 : 

130 C**CHR*C 147) - 0S-CHRSU45} t L 
S-CHRStlti) ; FS^CHHSC 146 ) 

Ì10 PRlNrCJ'-TDT 13'* ; Jl -9439: J£- 
3515: P0K£ SS, £0: POKE 56,37 
150 FOR J-l TU 450 r READ A:LJ-U+A 


160 PQKE 3043+ J , A : NEXT : IF LK>Sl 
TKtN FRI NT "ERRORE NEI E 
AIA’*! END 
170 Din HV: 13) 

1 B 0 PRINTC* 'SISTEniA-aASE 'iFDR J 
-l TO 1 3 : PH IN] TABt 3-LENt Si 
RI C J ) ) ) ; J ; 

130 INPUT A*:B£U)-A» 

£00 IF A*- M l w IrtEN POKE J1+J,1 ì 
POKE JB+J, 1:3010 £B0 


£10 [ F IHEN POSE Jl+J,£: 

POKE J£*J,£:GQTO £00 
IF THEN POKE Jl+J,3: 

POKE J£+J,3:GQT0 £U0 
£30 JF THEN POKE Jl+3,4 

: 0**D + 1 : POKE J£+J*lìB0T0 £tìtf 
£40 IF AS-'1£" IHEN POKE Jl+J.S 
: □ ■□+! ; PDKE JE+J , 1 t GU10 £30 
£50 IF AS ~“KS m THEN POKE Jl+J,6 
□-D+1PDKE J5+ J , £ : GOTO £00 
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470 


4tìtS 


530 

S40 


IF A*-*1X2" THEtt PtJKE Jl+J t 
7. TR-TH+1 : PQKt J5+J , X : E30IO 
esc 

BOTO 130 
ttEXT 

f*OXE 3, 104; POKE 4, 37; POKE 5 
,S1 PDK£ E. Il* 

J-lNH5fD*3tTR;>; Jl-J: D-J76b 
EBI POKE 3MH, iNTCDS r J-JMN 
TtlNKD 3*65201 1 
□-J/5SG; PDKE 3S5? , INT<0) iJ- 
J-lNTtiNTtD?*5b6J 
POKE 3bc?6,J 
FOR J-l TQ 13 

IF LENC B*C J >)"1 IH Etti POkE S 
bee^J.ltPOKL 9541+J ,0: POKE 
9554+J .0 

IF UNlllUn-S THLN Jl-Jl/ 
e CrUbUB 330 

ir LEHCBlt J>)-3 IHLtt Jl-Jl/ 

j : uosue 330 

NEXTJ: GOTO 400 

J5-J I : D-J l /6K01 : POKE 3554+ 

J. INltOl ; Jl-Jl -Itti llttTtDl*G 

S5HU 

0- Jl/ESB; MOKE 354 1 + J , Itti i D> 

: Jl-Jl-lHTt INI! DJ •eSti J ; POKE 

9b£0+J , J 1 1 JI-J5: HLTURtt 
PRIttlCS^ttUnEHO 5E1ÌN1" 

INPUT *i~DA M t D:OQ5UB 1100: P 
QKE 3665 , 0; INPUT "l-fl^jArbù 
bUB ll50:POKfc. 65/0, A: A-0:D- 
0 

INPUT -X-DA-ìD^UOSUH ll**tp 
DKE 3603 , D: INPUT "X-A'-AitiG 
SUB n<?0 POKE 9571 . A : A*0 r D* 

0 

INPUT "5-DA ' iD: GOSUB 1100:P 
OKÈ 9604, D: INPUT "5~A' f A:GG 
SUB 1150: POKE 3575, A: D-0 
PHINTC*“NUt1ERQ tlAX SEGNI* : P 
HlNT'COttSECUTIUI" 

INPUT "I-CONb hAX “ i o : B09UB 
1140: POKE SS73.D: SJ-0 
INPUT “X-CDttS ttAX*;Dtì05Uti 
1140 POKE 3374,0 
D-0I INPUT “5”C0NS ttAX"*D:PO 
Kt SS7S.D 

P«lttrC» w lttSE«lbCI “t P«1NT“C0 
LONttE IfiPQSSIfllU?* 

GET AStlF AS-^S 44 THEN 5*0 
[F A*-"N" TKEN POH J-3576 T 

0 3640: POKE NEXT : GOTO b 
40 

GOTO 430 

E UN X*i TO b:PRl NT Lft'XULDttN 
A inpQSb. tt" ; X : PRINI "--END" 
A+95G5;F0R J*1 TO 13:B*-~~ 
PRINT TABt 3-LEtt(STHl(. J J J J ; J 

1 : 1 ttPUT B* 

IF B*-*“ TKEN POKE A+X*13+J 
, Ù : GOTO 600 

IF B*-"l- TKEN POKE A+X-1J+ 
J H 1 : GOTO 600 

IF H1-“X" fHttt POKE A+X-13+ 
J, e . OPTO b«0 

tr tì»-p“£* THEN POKE A+K-13+ 
J . 3: GOTO 600 
PRIttTO*! :Bl-““:tK)TO 640 
NEXTJ 

PET A» t I F A*-**’' TKEN FOR J 

1- X+l TO 5 : FOR J-l TO 13:PU 
KE A+J1*T3*J * 0: NEXTJ , Jl : OOT 
O 640 

IF A»-- 4 ' IHEN 610 
NEXT 

PJflttTC*;FOJ? J-9B41 TO 3661: 
POKE J.0 NEXT 

FOR J-36G5 IO 3636 : PQKt J.0 
i NCXTi CLR : SYS 3050 
IF PEEKt 44 >- 16 TKEN PQKt 66 
536 , PEE K< 65566 J OR 16 


60® 

690 

700 

710 

7?0 

730 


1000 


1010 


1050 


1030 


1040 


1050 


Ititi* 


FU I NT t»" COLONNE; w i sA-FIUtCS 
G41 J *566+ PEEXC 964^1 pHjNjA 
FRI NT :Fm NT “REGI STNlT" 

6 ET A*: IF A*-"S” THEN 750 
IF M-*N" iMttt 1160 
GOTO 630 

PRINTC* H NA3ÌR0/mbC0 CN/D3 11 
GET AlilF A1-*N" THEtt OPEN 
1.1,1, -TOT" GOTO 760 
IF A0-“H" TKEN OPEN 1,6.15. 
4 'TQT , S, : GOTO 760 
GOTO 73* 

PRlNl*l , A: FOR J-10301 TU 10 
301 + 1 3* A- 1 

PRlNTtUPEtKt J ) : MfcXT : CLUbb 

DATA 165,44,501. 16, 50H , 0, 17 
3.6,555.41.533, 141 ,6,555. 16 
0,13,135,40. 37,170.554 
DATA 515.37. 173. 516, 37,536, 
516,37,506 

DATA 13.554.516. 37. 139,516, 
37,551 ,513,37.144 
DATA 13,540, 11.157.515, 37, 7 
6. 177, 30. 169.1.157,516, 37.1 
45.516. J7, 136,506 ,511 
DATA 160, 3, 165,515. 37.517,5 

03. 37. 176.5 

DATA 540.3.76.70,39,517,37, 

37.540.5. 144.3.76 

DATA 70.39, 136,503.530, 160, 
3.165,513* 37 

DATA 517. 100, 37 .540. 5.144, 3 
. 76.70.33,76, 56 
DATA 40,534.177,3,501,0,540 
10.517.41 

DATA 37,500,9,169,1,141.553 

, 37.76.45,40,169.0 

□AIA 76,53,40.173,553.37,50 

1.1. 506 .3.76 

DATA 70,39,54.165,3.105.13. 

133.3. 144.5.530 

DATA 4* IBS. 3,501 , 169, 506, 3, 

165.4.501 .37 

DATA 500,3,76.45,39,169.0,1 
41 ,553.37.76.35 
DATA 40, 165. 1 . 160,0, 163,40, 
37, 145.5.530,6,503,5,530,6, 

535 . 554 .14. 500 . 530 . 530 
DATA 169, 37,500, 3.539. 170,3 
7.169* 104,133, 3,163,37.133, 

4.506.54. 37.173.54.37 
DATA 501.555,500, 13,506.55. 
37. 173,55,37,501,565.509.3. 
506 .56,37, 165 , 3. 109 , 53 
DATA 37.501.0,509,4,505.500 
,546.96, 165 

DATA 11. 169.0. 157,515, 37 ,50 
5 , 506 , 540 ,165,13 
DATA 554, 170, 37.500,0,554,1 
03.37,500,3,554, 196,37,505, 
500,540, 165, 13,109,170 
DATA 37,551,66.37.500, 13. 10 
9.103,37 , 551 

DATA 69. 37,506. 11 . 109, 196, 3 
7,551 , U5.J7.500 
DATA 3, 35, 15,40.505,506, 556 
, 76,136,30 

DATA 109,57.37,501,4, 540. 10 
.501,9,540, 35.501 
DATA 6,540,45.501 .7,540,61. 
169,0, 157, 170 

DATA 37*96,199.40,37,501/1, 
5O0.6, 169,5, 157 
DATA 40,37,96,169,1.76.511. 
39, 109. 40. 37,501,1, 500 , 5 . 16 

9.3.76.511.39. 163.1. 76 
DATA 511 , 33, 133,40, 37,501,5 
,500,551 .76,557, 33, 109,40, 3 

7.501.1 .540.511.501.5 
DATA 540,5,169.1,76,511.39, 
163.3,76.511 


1070 


1000 


1090 


1100 

Il ì» 
1150 
1130 
U40 
1 ISO 
1160 

1170 

1190 

1190 

1500 

1510 

1550 

1530 

1540 


DATA 39. 163. 0, 157, 170,37. 16 

7, 163,37.157, 196 
DATA 37, 76, 177. 39, IJb.eUtJ, 3 
.76, 36,40,76,513, 30. 165,0.1 
60,0,70,530, 3S , 500, 195 
DATA 1J.50«, 3, 76.5S4, 3tì, 76, 
530. 36,141 ,553.37,76.564. Jb 
*0 

IF 0< 0 OR D>13 THEtt 400 
RE lURtt 

IF A<U OR AM 3 THttt 400 
RETURN 

1 F 0<i IHEN 440 
RETURN 

PR JNTO; : FOR J*1 TU A r PR I Ni 
ESìJìFIiìFO R XM TO 14 
0-PEEKt 10507*X>J*13) 

1 F 0M TKEN PRIMI "! " ; 

IF 0-5 THEtt PRJN1-X"- 
IF 0-3 IHEN PRINT “5" ; 

0-0*1 : 1 F 0*3 THEtt PRIttT" ** i 
: 0-0 

NEXT: PR J NI : 0-0 

GET A*rIF A**“" THEtt 1530 

NEXTJ 


THEN 440 


tU ArpHlNT 
TQ 14 


L«9 HEti DISPLAY PER TOT 13 
110 ; 

150 Ù I n A*C 7*0j : CÌ-CHR*1147> : 09 
-CHR*< 17 J : E*-OHR*t 167 > Kl-C 

130 KOB 1*1 TO 17iG»-U<+CHN»H/ 
>-NEXltH*-CrtR*U9J 
140 PM INI 0**0 I 3 P L A Y H 
1$® PRlNTt PNINT- I ClftTI SONU 6U 
NASTRO 0 DISCO'» (N/D>“ 

160 GII A0tI t A*-“M- IKEN UPEN 
1,1,0, "TQT* f 0OTO 190 
17* IF A0**D" IHEN OPEN 1.0.13, 
"TOT, 9,R*tOOTO 190 
IMI GOTO 160 
19* INPUT*!, NK 
500 P* INI C*’Lr muftì DATI* 

31* FOR 4*1 TQi N*: FOR H-l TU 13 
t INPUTtl , A* R*CJ JJoA*' 
NRXTH. JiCLOSt 1 
54* PHIMIC*X1X* 

53* PRTNT*PliEm UN TASTO PER IN 
IJ 1 ARE 4 

54® mt «: IF A**“‘- THEtt 54* 

56® **i 

560 PRINTM^ÙA-.H; P-0 

57® PRTNlìFOR J*H IO K+19 
500 FOR X*l IV 56 SIEP 5:ft*-mO 
*CA*VJJ.K,1J 
50» IF A** ** 1 4 THEN 350 
300 IF A»- *£»' THEtt Al- 41 X 14 
310 IF A»- -*3* THEN A»* ,4 5- 
350 PRINTAS ;ì(ttlt»n NEX I K 
330 PRINÌN*; PK Itti : PKlttT 1*^41; 
^10 NEXTJ- PRINTM», Li*' 1 * :PROSS IMG 
GRUPPO: PRINT “13 UPJT-- 
3S0 GET a*;tr 5*<>“** in EN 410 
360 IF 2*-" TKEN 35® 

1F0 

3B® IF N< *NR THEN 5be 
390 PRINT PRlNTrPlflttTtPHlttT “FIN 
E 1 

404 END 

410 IF 5*-CHil*Cfl9> THEtt r-P-M : G 
OTO 440 

45* lì 5*-CHR*TÌS7j THEN P*P-i^ 
GOTO 46® 

43® GOTO 35* 

44® Il pt-iH 14£N PRIttrtLtFII 
t*; : GDIO àhió 
450 P-l9:UdTO 360 
460 IF P»*0 THEtt PRIttT‘ 4 CLEFU £ 

5 LEFT Jt 41 j 0D1EJ 36* 

47® P** ttEJIO 350 

1 ; END T " lì 
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COMMODORE 64 


La macchina del tempo 


Tutto quello che dovete conoscere sui due 

orologi interni del C/64 


di Kibìo Cesari 



Forse non molti di voi sanno che 
nel 1764 esistono ben due orologi si- 
tuati all interno dei due CIA (Com- 
pie* Interface Ad apier), circuiti inte- 
grali che sì occupano delle operazio- 
ni di Input/Output (I/O). 

I registri dei due CIA partono ri- 
spettivamente da 56320 (SDCOO) e da 
56576 (SDDOO), 

Nel programmaa presentato in 
queste pagine si è latto uso di uno so- 
lo dei d ue o mi t >e i lui la vìa i I loro fu n- 


z ion a mento è identico ed e su ilici e ri- 
se modificare l'indirizzo di partenza 
dei registri secondo i valori sopra ri- 
portati a seconda che si voglia uli liz- 
za re il primo o il secondo. 

Il breve listato pubblicalo ù sul tan- 
to un esempio di questa tecnica di 
programmazione, che non sfrutta 
co m pietà mente le possibilità offerte 
dal computer 

Lasciamo a voi il piacere di modifi- 
carlo. completarlo e renderlo più in- 


teressante aggiungendo magari un 
cronometro ed un allarme. 

A questo punto qualcuno di voi si 
saia domandato se per caso fora di 
cui stiamo parlando non sia quella 
contenuta nel fa rei nota variabile 

m 

Non lasciatevi ingannare da que- 
st uhi ma che non ha proprio nulla in 
comune con quella gestita dai due 
CIA. 

I nfiltri la variabile T1S è soltanto un 
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Probabilmente, nessunaltra stampante riunisce in se tutte 
le straordinarie prerogative della NL-10, una periferica per 



computer estremamente convincente nelle prestazioni e 
nei prezzo NL-10 può contare su fans in ogni settore aperto 
all'informatica: gestionale, organizzativo, amministrativo, svr 
luppo, produzione, hobbystico. Dì lei gli addetti ai lavori apprez- 
zanolasempficitàd’usoelaqualità dello stam pato. E sorpren- 
dente su NL-10 la quantità di funzioni di stampa, controllabili 
dall'utente tramite un pannello frontale molto sofisticato, cosi 
come la varietà dei formati di stampa e iasuaenomne adattabi 
irta a qualsiasi tipo di computer Anche neil'affidabilità NL-tO 
darà prova di tutta la sua amicizia, Chieda al nostro rivenditore 
di zona una dimostrazione di Superstar NL-1Q siamo certi che 
anche Lei concluderà che, con una Star, si può andare molto 
lontano! 



^ - - - - >g_ - 

Per avere maggiori informazioni e l'iridi rizzo de? rivenditore della Sua zona, 
cì invìi il coupon allegato. 

Ditta; „ Via- 


I Nome: Cap.;_ Citta 






L’UTILE 



contatore incrementato ad ogni in- 
lerrupt e per di più non è molto preci- 
so considerato il fatto che quasi tutte 
te operazioni di I/O modificano La 
frequenza degli interni pt, Gii orologi 
di cui parliamo, invece, lavorano in- 
stancabilmente e la loro “avanzata" 
non viene minimamente alterata da 
"strane" operazioni che l’utente può 
compiere, come comandi di CLR, 
SYS64738, modifica involontaria di 
Tl$ ed altre, Solo la pressione del ta- 
sto Reset (se lo possedete) azzera i 
due orologi. 


L'ora 

Passiamo a questo punto ad analiz- 
zare come è organizzata e come vie- 


ne gestita Torà al fin temo del com- 
puter. 

Facendo riferimento alla figura, 
potrete notare che esistono ben quat- 
tro registri che si occupano di conser- 
vare i dati per 3 orario. 

I dati ivi contenuti sono in forma 
BCD (Binar) 1 Coded Decimai) e ciò 
rende più semplice La conversione in 
caratteri ASCII (American Standard 
Code for Information lutcrchange). 

La rappresentazione dei dati in for- 
ma BCD permette la codifica delle 
dieci cifre da ’TT a “9" utilizzando 
soltanto 4 bit e quindi tutti i numeri 
superiori a 9(1001 In codice binario) 
non sono numen BCD legali; anche 
nel caso in cui due numeri BCD ven- 
gano sommati tra loro, e il risultato 
sia un numero maggiore di 9* tale va- 
lore non deve esser considerato in 
Torma BCD ortodossa. 

Passiamo ora ad analizzare uno 
per uno ì contenuti dei registri rap- 
presentati in figura. 

II registro 8 contiene i decimi di se- 
condo rappresentati dai 4 bit meno 
significativi (dal bil 0 al bit 3) mentre 
i restanti 4 rimangono inutilizzati. 

Nel 9 c nel 10 sono allocati, rispetti- 
vamente, i secondi e i minuti 

In entrambi, i primi 4 bit (meno si- 
gnificativi) contengono Le unità, men- 
tre gli altri 4 (più significativi) con- 
tengono Le decine. 

L'undicesimo registro contiene le 
ore e, come al solito, i primi 4 hit rap- 
presentano le unità mentre dei re- 
stanti 4 il primo (bit n,4) contiene le 
decine (1 oppure 0)c l'ultimo (bit n,7) 
"I" se sì è di pomeriggio (PM)e "0“ se 
si è di mattina (AM), 

Oltre a ciò è possibile fissare anche 
la sveglia (alami). 

Questuiti ma viene "scritta" negli 
stessi registri di cui abbiamo parlato 
precedentemente; tuttavia per fare 
ciò deve dapprima essere settato a 1 il 
bit 7 del registro 15 che va riportalo a 
zero una volta terminata fopc razio- 
ne di impostazione dell'allarme. 

Per sedare tale bit è sufficiente dare 
d comando; 

PO RE 56335,PEEK(56335) OR 128 

Fate attenzione che il valore 56335 
è stato ottenuto aggiungendo 15 al 
valore 56320 che è il valore di parten- 
za dei registri de) primo CIA; per il 


secondo CIA si dovrà aggiungere il 
valore 15 a 56576 che è appunto il va- 
lore di partenza del secondo C’IA. In 
seguito faremo sempre riferimento al 
primo Ci A. 

Nel caso in cui si voglia aggiornare 

l'orario, si dovrà forzare a zero tale 
bit cosa che si ottiene con il se- 
guente comando: 

PGKE 56335, PEEKl 56335) AND 127 

Ricordate che questo comando de- 
ve essere dato anche ogni volta che 
termina un'operazione di aggiorna- 
mento dell'allarme. 

Durante la fase di aggiornamento 
sia dell'ora che dell allarme, è neces- 
sario seguire un certo ordine; infatti 
vanno aggiornate prima le ore poi i 
minuti, i secondi c per ultimi i decimi 
di secondo. 

Non appena un dato viene posto 
nel registro delle ore. viene bloccalo 
fi nere mento del forano, che verrà ri- 
pristinalo automa tic a mente subito 
dopo aver scritto neLfuttimo registro 
(quello dei decimi di secondo). 

E’ importante notare che mentre è 
sempre possibile sapere l'orario an- 
dando a leggere i valori contenuti nei 
quattro registri preposti a tale funzio- 
ne, non lo è altrettanto per l’al- 
larme. 

Intatti pur sellando a I il hit 7 del 
registro 15 e andando a leggere i regi- 
stri dal n.8 all undici, vi troveremo i 
valori delle ore. dei minuti e dei se- 
condi dell’orario, mai quelli dellal* 
larmc. 

Per la conversione dell'ora in dati 
numerici in forma BCD tali, cioè, da 
poterli pokare nelle locazioni di cui 
abbiamo parlato, vi suggeriamo di 
dare un'occhiata alle Linee del pro- 
gramma presentato, dalla 900 alla 
940. 

Il bit 7 del registro 14 svolge una 
particolare funzione di vitale impor- 
tanza per la precisione delfincre- 
mento dell'ora. 

Tale bit serve per definire la fre- 
quenza di rete, frequenza che in altri 
Paesi è di 60 Hz. (bit 7 rescttato) men- 
tre in Italia è di 50 Hz (bit Tal). 

Poiché all'accensione del computer 
questo bit è automaticamente reset- 
tato, deve essere forzato a 1 affinchè 
il tutto possa funzionare con una cer- 
ta precisione: 

PURE 56334,PEEK(56334) OR 128 
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U UTILE 


N* RLBISIRI (.+ indirizzo CIA) 


BIT 

ti 

3 

10 

ii 

13 

14 

15 


DEC * 
SEC * 

SEC . 

MIN. 

□ RE 

IRQ 

FREQ* 

HZ, 

ORQL . 
PILLAR . 

0 

0 

U 

u 

u 

* 

* 

* 

1 

D 

U 

u 

u 

* 

* 

* 


□ 

U 

u 

u 

l-ON 

0-DFF * 

* 

3 

D 

U 

u 

u 

* 

* 

m 

4 

♦ 

0 

0 

D 

m 

* 


5 

* 

D 

n 

* 

m 

* 

« 

5 

« 

D 

D 

* 

m 

# 

* 

7 

m 

m 

s- mmm . — - 

m 

0- AM 

1- PM 

m 

1-50 

0-60 

0- OROL 

1- ALLA 


Tabella dei valori contenuti da ciascun 
bit per i registri del CIA* 

J, D" indica le decine, ”U ,J le unita* , men- 
tre indica un contenuto privo d 1 im- 

portanza , 


t enni su iU gestione 
dclPaftarme 

Abbiamo |£S£i visto quale procedura 
si dcbha seguire per fissare fati arme, 
tutta via non abbiamo ancora parlato 
del suo funzionamento. 

Una volta che sia stata fissata l’ora 
dclfallarme, il computer continuerà 
a confrontarla con quella in con li - 
imo aggio marne n to, fino u che sa- 
ranno uguali. 

A questo pu nto viene sellano il bit 2 
de t registro 11 e attivato un i n ter- 
ni pi 

I l registro 13, in verità, è formato da 
due registri clic svolgono altrettante 
I unzioni: il primo è a sola lettura e 
contiene lutto le possibili sorgenti 
d in terni pi, mentre il secondo è a sola 
scrittura e viene utilizzalo per abili la- 
re o disabilitare tali sorgenti. 

E’ ovvio, quindi, che se desideria- 
mo utilizzare l'allarme, lo dovremo 
abilitare con il semplice comando: 
PGKb 56333,132 

mentre nel caso desideriamo disabi- 
litarlo sarà sufficiente: 

POKE 56333,4 

Abbiamo dello precedentemente 
che nel caso in cui t due orari (quello 
iti continuo aggiornamento e quello 
dell'allarme) siano uguali, lì compu- 
ter, olire che setta re il hit 2 del registro 
13, attiva anche un interni pi. 

Soffermiamoci un momento soda 
funzione svolta da quest’ut limo. 

L'interrupt è un segnale invialo ci- 
gni sessantesimo di secondo al mi- 
croprocessore (il 6510 nel caso del C- 
641 clic obbliga quest'ultimo ad inter- 
rompere l’eia borazione fin, in corso 
per eseguire la normale routine din- 
terrupt che parte dal l'indi rizzo esa- 
decimale $EA31. 

Questa si occupa della gestione del- 
la tastiera e in genere di tutte quelle 
funzioni senza le quali il computer 
non potrebbe colloquiare con l’ester- 
no. 

Per modificare tale routine si agisce 
(con molta cautela e solo con pro- 
grammi in L.M,) sulle locazioni 788 e 
789 che contengono il suo indirizzo 
di partenza (SEA31), 

L’ infatti possibile modificare il 
contenuto di tali locazioni facendo 
loro “puntare ” una zona dì memoria 
che non sia la solita ($EÀ3tf ma 
contenente, invece, una routine in 


linguaggio macchina appositamente 
preparata per IL nostro scopo. 

Così facendo ogni volta che viene 
generata una richiesta d "interni p( T il 
computer salterà alla nuova routine 
(quella puntata da 788-799) clic, ad e- 
sempio, dovrà controllare se è stato 
settato il bit 2 del registro 1 6 (locazio- 
ne di memoria 56333 in decimale e 
$1X70 D in esadeciamale). In caso af- 
fermativo dovrà produrre, ad esem- 
pio, u n segnale acustico per avvertire 
che l’allarme è scattato; quindi salte- 
rà alla normale routine d'interrupl 
posta ad SEA31. 

In caso negativo dovrà saltare diret- 
tamente ad SEÀ31 senza eseguire la 
routine di segnalazione. 


Il programma 

Come abbiamo già detto, d pro- 
gramma di queste pagine ha solo una 
funzione dimostrativa. 

Subito dopo aver dato il RUN verrà 
chiesto di introdurre forano. 

Per fa re ciò occorre scgu i re un a ec ir- 
ta procedura; prima di tutto dovete 
rispondere se starno di manina (AM) 
o dì pomeriggio (PM ) Quindi verrà 
chiesta la digitazione dell'ora, che 
ovviamente non deve essere maggio- 
re di 12, c, in seguito, dei minuti e 
dei secondi. 

Una volta terminate le domande 
verrà costantemente visualizzata l'o- 
ra sullo schermo, in alto a sinistra. 
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L’UTILE 


Le prime due cifre indicano l'ora, le 
due successive ì minuli, le altre due i 
secondi e l'ultima i centesimi di se- 
condo 1 poco utile a causa dell'elev aia 
velocità di scorrimento del tempo ri- 
'petlo a quella della visualizzazio- 
ne). 

La linea 1 20 serve per selezionare la 
frequenza dt rete. 


Quelle dalla wxi alla USO si occupa- 
no del l'aggiornamento dell'orario e 
richiamano molto spesso la routine 
(linee 900-940) che serve per tradurre 
opportunamente i dati battuti in for- 
ma idonea per pokatli nelle apposite 
locazioni. 

Le linee dalla 2000 alla 2215 si oc- 
cupano dì lare l'esatto contrario delle 


operazioni precedenti, ossia leggono 
ì dati nelle locazioni di memoria del 
C IA e li trasformano in maniera a 
noi comprensibile creando una strin- 
ga A$ che contiene, per l'appunto, 
l'ora in forma leggibile 
La linea 2220 si occupa di stampa- 
re in alto a sinistra sullo schermo la 
stringa AS. 


30 RED OROLOGIO C/64 
70 REM BY FABIO CESI ARI 
90 REM CUSANO MI LAN INO CMI) 

95 : 

100 CI -56350 

110 REM * SELEZIONE FREQUENZA S 
0 HZ.* 

150 POKE Cl+14, PEEKCC1+14) OR 
158 

130 : 

140 : 

600 REM * AGGIORNA ORA * 

610 POKE C1+15,PEEK<C1+15) AND 

157 

650 PR I NTCHRSC 147 )CHRSC 1B) "AGGI 
ORNAMENTO DELL’ORA” 

630 PRI NT ”AM O PM ” j : AS— ” ” 

640 GET AS : I F AS-"" THEN 640 
650 IF AS-"A” THEN A-0:PRINT" A 
” : GOTO 670 
660 A* 150: FRI NT" P” 

670 AS-"”: INPUT "ORA " ; AS 
600 1F LENC AS)>5 THEN PRINTCHRS 
C 145) ; :GOTO 670 
630 GOSUB 900 

700 IF Z> 1B THEN PRI NTCHRSC 145 ) 

; : GOTO 670 
710 POKE C1+11.2+A 
750 REM • AGGIORNA MINUTI * 

730 AS-”": INPUT "MINUTI " ; AS 
740 IF LENC AS)>5 THEN PRINTCHRS 
( 145) ; : GOTO 730 
760 GOSUB 300 

770 IF Z>BS THEN PRI NTCHRSC 145 ) 
j : GOTO 730 
700 POKE Cl+10,2 
790 REM * AGGIORNA SECONDI * 

000 AS- ” ” : I NPUT "SECOND I " ; AS 
B10 IF LENC AS)>5 THEN PRINTCHRS 
C 145) ; : GOTO 000 
050 GOSUB 900 

030 IF Z>0S THEN PRINTCHRSC 145) 


; : GOTO 000 

040 PDKE CI +9, Z: POKE Cl+8,0 

050 GOTO 5000 

900 REM * CALCOLO DATI PER LE P 
OKE * 

910 IF LENCAS)— 1 THEN X“0:GGTO 
930 

950 X-UALCLEFTSCAS, 1) ) 

930 Y-UALCRIGHTSCAS , 1 ) ) 

940 Z-16-X+Y: RETURN 
5000 REM OROLOGIO 
5010 PRINTCHRSC 147) : PR1NT" HHMM 
SSC” 

5150 AS-”":IF CPEEKCC1 + U) AND 1 
5B)-158 THEN A$-"P ”:GGTL) 5 
135 

5130 AS- "A " 

5135 BS-STRSC CPEEKCCl+ll) AND 54 
0)/16) 

5140 IF UAL CBS) -0 THEN AS-AS+ ”0" 

: GOTO 5155 

5145 IF UALC BS )— 9 THEN AS-A$+ M 1" 
•.GOTO 5155 

5150 AS-AS+RIGHTSCBS, 1) 

5155 BS-STRSC PEEKCC1 + 1 1 ) AND 15) 
5160 AS-AS+RIGHTSCBS, 1) 

5165 BS-STRSC CPEEKCCl+10) ANO 54 
0 ) / 16 ) 

5170 AS-AS+RIGHTSCBS , 1 ) 

5175 BS-STRSC PEEK CC1 + 10) AND 15) 
5100 AS-AS+RIGHTSCBS, 1) 

5185 BS-STRSC C PEEK CC1+9) AND 540 
)/16) 

5195 AS-AS+RIGHTSCBS, 1 ) 

5500 BS-STRSC PEEKC Cl+9 ) AND 15) 
5505 AS-AS+RIGHTSCBS. 1 ) 

5510 BS-STRSC PEEKCC1+8) AND 15) 
5515 AS-AS+RIGHTSCBS. 1 ) 

5560 PRINTCHRSC 19 )A$ 

5530 GET CS : I F CS<>”“ THEN 140 
5535 GOTO 5150 
5540 END 
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GRUPPO CONTINUITÀ 

finito hiì;i b* T? berter*. * stile TWafièapiU 

Còn**M* n fuóiHiiWfteflie dei Ventri e ompui#- 
ComTKieJcKii C64 a Vie 30 m «sten;* <j, conwt 
re Durila di funzionamento 30 minuti Ricanta 
fremii* 4tim*niiior* Commodore 


cuffia per 

GOMMO DO- 
RÈ C 64 

Leggerissima per- 
mette f -a scotto pii r 
wnaie del compu- 
ter evitando di di- 
slrurtiate dorarne I 
giochi 


KIT ALLINEAMENTO TESTINA 

Comporne der (aet«»i« d**iro d> cunt'iaMo * J' la 

radura um monde* audu.' pafm#fl# ■: p*rtHTo «iifna.arnur’ti:.- ci*. 
r*gi*traton digli*- «nervi con n«ir- r,rjrm*ifi*l. 


VELOCIZZATORE Dt CARICAMENTO FLOPPY 

Gartndg® con un insieme fl. utility i u ,rq* ^ .'/il# 

«I dr'w* nei Commodore W 


INTERFACCIA RADIO 

I nd iSp*o**t)i*n («)>- i*gi!|ir«r# con 
r*giali«fL»rfl Commodore modallei 
C?N 1 pM.igr*j+»rm spanali p^i 
computer !f*wti*4Si iMl% ammanii 
WkO 


COPIATORE PROGRAMMI 



DUPLICATORE CASSETTE 


D ispo&il to hard # .ire per pPelluiì r f> CDOC tJi na 
afri profeti, q bulbo Utilizzando -due reg isl raion 
Comimodora 0 compatibili 


Hnnspensariih* por realhraarw peNi? copi*, con un 
rateisi r aiewe nnr m.i ■ n. ur, nasirt) protetto b «m 
cancamenlo lutto 


Bua quadralo* 

Art CO 100 

i. 

56 OOP 

Interfaccia cassette 

Art CD 101 

L, 

34 000 

Duplicatore cassane 

Art, CD tfl? 

L, 

J4000 

Copiatore programmi 

Art CD 103 

L. 

34 000 

interfaccia radio 

Ari CD 104 

L 

34 0Q0 

KM alìioeiminla MUrtl 

Ari. CD 105 

L 

47.000 

Ai mentalore per C64 e VhC 20 

Gruppo coni muli* (fornito senza 

Art CO 106 

L. 

46 000 

l* 1 2 batl arte a alilo ftcertClttUi) 

Pacco baitene {i 2 si lo 1 ,2 Voli 

Art CD 107 

L 

66 000 

marcata ih 

Camm j i aldre atiiaona 

Art CO 117 

L. 

52 000 

TV^ompulaT 

Art CD 108 

L- 

(500 

Taalo reso! 

Art CD 10S 

L. 

4.500 

interface: la Ce ri runica 

Art CD 112 

L. 

104. ODO 

Espansióne di memoria ppr C 5 6 

Veloci£»ior« di ciricifnrnla 

Art CO 114 

L 

15« ODO 

fcspa risone di memoria per 

Art CO 11S 

L. 

*9 000 

V»C 30 16K 

Art CO 116 

L- 

112.004 

Mndviialorn 1- * «cultve 

Art CO 120 

L, 

72 000 

Penna ottica g'aiica 

Art CD 121 

L. 

45000 

T jvoNjiid grafica 

Art CD 1M 

L. 

234.000 

Multi presa con filtro 2 prese 

Art CD UO 

t. 

41-000 

Cuffie per Commodore C 64 

Slaa>mjf fatare elettronico di 

Art CD 150 

L. 

19.400 

iena ione 500 W 

Art CD 180 

u. 

*30 WK) 

Gruppo di cinti nona 60 W 

Art CD ITO 

L. 

400 000 

Gruppo di eonlmurta ZOO V 
inventar 1 2 voli CC 220 VoE Cd 

An CD i« 

L. 

402 000 

1Q0 Wall 

Art CD 19C 

L 

297.000 

Cavo ainnenia^Kjne 

Cavo drive o stamparne 

Art CD 200 

L. 

4 600 

Commodore 

Ari CD 205 

L- 

4.500 

Prolunga per JoysHcH . rr,£ 3 

Art CO 210 

L. 

25 000 


Prolunga pe< cavo TV mi 3 

Ari 

CD 216 

L. 

12.600 

Cavo audio - mi fl 

Art 

CD 220 


15. SCO 

Adatlaloie Jotsiicli {Alan e C&4 ai 
C 1 67 

Art 

CD 225 

L. 

10 500 

hdaflalCKB regia Ir alare per C 16 

Art 

CD 228 

L. 

19.500 

Mascherina anisnlieeso l? 4 ' 

Art 

CD 300 

t 

35000 

Neacio inthiosiraiù per TaJly 
nrt 80 

Ari. 

CD 810 

L 

10.500 

Nastrp inchiosfrato per T aiiy 
mt 180 

Ad 

CD 81 ì 

L 

18500 

Mastro ifttlrósIraiD pài Tally 1000 
* Hpfiaywel 

Ad 

CO 812 

L. 

9.500 

Nastro meta imi rato per 
Comrrijdorfl MRS BÙI 

An. 

CD 814 

L. 

13.000 

Neslrp meli >051 ralo pei 

Commodore MPS IM2 

Ari 

CD 616 

L. 

11.000 

Siasi rd inchiodi relè per 
Commodore WPS 803 

An 

CD 615 

L 

19.500 

Mause per Commodore C 64 

Art 

CD 560 

L 

240 ODO 

Pacco carte lettura inculiate 

24" v il" modulo da 540 Fogfi con 
pondi * scappo 

1 

Art CD 6» 

L. 

1 3.500 

Supporto stamparne twrta cena in 
plengiaaa "fuma" normale 

An 

CD 680 

L. 

69.000 

Supporto stampante porta caria m 
pien^i.-iss 'lume" i rkirraio 

Ari 

CD 670 

U 

60.000 

Floppy disk 5" singola taccia 
doppia de rtsita ' ’00P J 

PDfif 10 pe??i 

Art 

CO 700 

L. 

40.000 

Floppy disk 6’ singola faccia 
doppia densità "CBS 11 
oonr 10 per zi 

Art 

CD 702 

1. 

3*. 000 

Floppy disk 5” singola faccia 
doppia densità VEH0ATIM ' 
cdrtf 10 perri 

Art 

CD 704 

t. 

42.004 


Floppy d«ak 5"’ singola lacca 
doppio daesitA DVSAM' - 


cord 10 pezzi 

Art 

CO 

708 

L. 

88 004 

Nastri magnetici C IO digitali 
cpnt 1(0 perr' 

Art 

CD 

713 

L. 

30 000 

Nastri magnetici C 15 donati 

Ari 

CD 

71* 

L 

21 040 

Copntaabera in plexiglas per 

C8* C18 e VlC 20 

Art 

CD 

750 

L. 

16 000 

Copot&aliera in stptla per 

C64 C te e VlC 20 

Art 

CO 

780 

L. 

10.500 

vate fleti a ponartopipy in pievig .-ISS 





per 40 dracdi con ■cfmave 

An 

CD 

770 

L. 

34.000 

Vuciielta pori afiopay m pievigiaas 





per 90 drscfu Con u biavo 

An 

CO 

780 

L- 

37 000 

Kn puiuia lestma registraiora 

An 

CD 

US 

L. 

13 600 

Kit pulizia disk drive 

Ari 

CD 

820 

L 

28000 

Kit pulizia tastiera 

Ari 

CD 

830 

L, 

16 500 

Furaluru dislt in plastiqsn (per u!illf 






zarR la seqondO lancia dei diSCrtn 

Art 

CO 

140 

L 

10 004 

Ffjretore disk in metano "tAko" 

Ari 

CD 

148 

L_ 

14.000 

JOyStrClh tjpec traviati': Il 

Art. 

CO 

«0 

L, 

27 000 

Jgyslch a Microswrtcri 

Joystick swui fili con unni 

Art 

CD 

151 

L. 

52 500 

ucevenle {funziona a battana) 
Jóyslick par ComrnwforB 18 

Ari 

CD 

852 

L* 

98 000 

(originale) 

Art 

CD 

130 

L. 

29 500 


rum I PREZZI SONO COMPRENSIVI di iva 
NON SI ACCETTANO ORDINI INFERIORI A L 30.000 
CONTRIBUTO FISSO SPESE DE SPEDIZIONE L $600 

SI ACCETTANO ANCHE ORDINI TELEFONICI 
Al NUMERI 0S22 661647-661471 


BUONO DI ORDINAZIONE 

NOMI- COGNOME 

■UCHFH23SO 

L _ _ _ 

Cap CiTtA 


I N J 

pf*DvinCia 

I _| 


VGGUATE INVIARMI IN CONTRASSEGNO 


N 

Art 

i 

L 

N 

Afl 

L. 

N 

Art 

L 

SPESE SPEDIZIONE 

L 5000 
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L’UTILE 

C 128 


Supertastiera 


Come utilizzare il tastierino numerico 
del C/128 anche in “ Modo 64” 


di M'friiftggi e U. ('ola picchiotti 



^Jo nostante il 1 ricco sia nolo da 
tempo, grazie ad una delle (poche) 
notizie diffuse dalla stessa Commo- 
dore a proposito del C/128, numerosi 
sono i lettori che hanno richiesto la 
procedura da seguire per servirsi del- 
la parte destra della tastiera. 

Abbiamo quindi deciso di pubbli 
care una versione sufficientemente 
breve per aggiungere al C/128, fun- 
zionante in modo 64, La comoda 
possibilità, 

11 problema 

La tastiera del C/128 è formata da 
ben 92 tasti che sono purtroppo com- 
pletamente disponibili solo in modo 

128. 

E' impossibile infatti usare in modo 
64 il tastierino numerico che, peral- 
tro, risulta molto comodo se si devo- 
no inserire lunghe liste di numeri co- 
me quando, ad esempio, si utilizza ti- 
no spreadsheet o si deve ricopiare, 
come in questo caso, una lunga serie 
di DATA 

Sembrerebbe che non ci sia modo 
di utilizzare il tastierino in modo 
64, 

Esiste però una locazione che con- 
trolla la scansione di lutti i tasti 
disponibili. 

Questa locazione non è ovviamente 
presente sul vecchio C/64, ma solo 
nel 64 “contenuto 1 ' al Lì n temo del 
C / 128, ed esattamente allindi rizzo e- 
sadecimale SD02F (decimale 53295), 

Quando siamo in modo 64. la scan- 
sione della tastiera avviene esatta- 
mente come nel 64 "normale", ma è 
possibile modificarla con una routi- 
ne in linguaggio macchina che esten- 
de la scansione a tutta la tastiera, 
comprendendo anche il tastierino 
numerico e 3 quattro tasti cursore. 
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Tale routine non attiva comunque i 
tasti Alt. Caps Lock, Tab, Esc, Help, 
Line feed, 40/80 display. No scroll. 

Per utilizzare la routine è necessa- 
rio ricopiare attentamente tutti i DA- 
TA che compongono il listato di que- 
ste pagine. Se non avete inserito cor- 
rettamente i dati il programma darà 
una segnalazione di errore e sarà ne- 
cessario controllarlo con attenzione. 

Una volta comparsa la scritta che 
avvisa l'attivazione dei tasti speciali, 
potremo coniare su 18 nuovi tasti da 
utilizzare sia durante la stesura dì 
programmi, sia durante un qualsiasi 
inserimento di dati numerici, 

Precauzioni da prendere 

La routine altera i normali valori 
del fìnte rrupt, cioè quella routine che 
viene richiamata dal Sistema Opera- 
tivo ogni 61 Imo di secondo. 

Se quindi cercate di utilizzarla con 
programmi che a loro volta modifi- 


cano i vettori di interrii pi, è probabile 
che si verifichi un Crash del sistema, 
costringendo a spegnere, riaccendere 
e ricominciare daccapo. 

Potranno sorgere problemi anche 
con giochi contenenti musica in sot- 
tofondo, e con programmi su car- 
tidge, ì quali riportano ì vettori deb 
Tinteirupt a valori standard. 

Un'altra limitazione è dovuta al fat- 
to che premendo i tasti Run/Stop e 
Restore la routine stessa viene disat- 
tivata: per ripristinarla è comunque 
sufficiente un SYS 976, 

Non dimenticate, inoltre, che la 
routine occupa la zona dì memoria 
riservata alia gestione del nastro cas- 
setta. Se dovete utilizzare il registra- 
tore. quindi, escludetela mediante 
Run/Stop e Restore e in seguito, una 
volta completate le operazioni su na- 
stro, ricaricatela e lanciatela. 

Chi utilizza il drive, invece, non a- 
vrà questo problema. 
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100 REM SUPERTftSTIEffft 
110 HLfl PER C/18B 
180 REn IN MOOU 64 
130 : 

140 REM BY M. il ASEI S U. CQLAP1 
CCHIONI 
150 : 

160 TEMS-976 

170 B-868 : PR INTCHRSt 147 ) "STU LE 
BGENUO I DATI .... M 
1B0 READ fi : PDKE B . A : B-B+l : C-C+A 
: I F B-974 THEN B-B+l: BUIO 1 
00 

100 IF BO0B0 THEN 100 
800 IF 010518 THEN SYSTEMS: PRI 
NTCHRSt 147) '‘TASTI EH INO NUME 
RIGO IN FUNZIONE”: END 
810 PRIMI "ERRURE NEI DATA": END 
880 DATA IBS ,3,78, IBS , 75 , 78 ,0,7 
8,165,197,78 

830 DATA 78, 76,49,834, 180, 160,0 
, 165, 803,801 ,54 


840 DATA 806,86, 169,855, 141 ,0,8 
80, 140,47,808 

850 DATA 173, 1 ,880,801 ,855,840, 
73, 134,197,169 

860 DATA 854,78, 168, 6, 141 ,47.80 
8, 173, 1 ,880, 805, 1 ,880,808, 8 
48,74,176.9,78,165, 163 
870 DATA 3,840, E, 133,803, 104,80 
0,808,808,840, 104,56,48, 198 
,83, 144,819, 165,803 
660 DATA 601 ,64,640, 86, 166, 169, 

160.0. 144.8.41 . 167. 133.803, 
168,194,160,1 . 169,835 

890 DATA 140, 141 ,8, 134,845, 133, 
846,38,884,834, 169,855, 141 , 
47 , 808 ,38,66, 835 , 76 
300 DATA 189,834,0,87, 16,0,59,1 

1.84.56.0. 40 

310 DAIR 43,0,1,19,36,8,0,35,44 
, 135,7, 130,8,0, 180 
360 DATA 169.60. 141,80,3, 168,3, 
141,61 ,3,88,96 


TI PIACEREBBE 



CREARE LEZIONI, 
ESERCIZI O PROVE CON IL 
COMPUTER? 


REGISTRARE 

LE PRESTAZIONI DEI TUOI 
ALLIÈVI? 


VERIFICARE 

L'EFFICACIA DELLA TUA 
LEZIONE? 


FARE CIO' SENZA 
CONOSCERE I LINGUAGGI 
DI programmazione? 


CON 

PROGREDISCO 

PROGREDISCO 

TI FARA’ 

PUOI FARLO! 

CAMBIARE IDEA! 
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• Timo IN ITALIANO 

• 98 PAGINE VIDEO 

• GRAFICA E TESTO A COLORI 
« ARCHIVIO ALLIEVI 
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• CONTROLLI DI COERENZA 

• GIÀ’ DISPONIBILI UNITA’ DIDATTICHE 
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Finalmente su disco 
l'Enciclopedia delle Routine 

Software a basso costo, programmi 
sprotetti e listabHi, possibilità di 
modificarli; ed altro ancora... 


Come già accennato nell'editoria' 
le. pubblichiamo la Directory (da cui 
il nome della nuova iniziativa) del 
dischetto che è possibile richiedere 
in Redazione secondo le modalità 
indicate in fondo all'anicolo. 

I listati pubblicati sono piuttosto 
numerosi e tra questi figurano TUT- 
TE le routine della nota “Enciclope- 
dia" che tanto successo ha riscosso 
presso gli utenti Commodore. 

Si noli, inoltre, la presenza di TUT- 
TI i listati pubblicali sul numero 
scorso e. se non bastasse, gli altri pro- 
grammi che costituiscono una com- 
pilation di Best Seller di giochi com- 
parsi sulla rivista su cassetta “Softwa- 
re Club". 

Funi i programmi sono li stabili c 
copiabili, tranne che per scopi com- 
merciali. Gli appassionati possono 
quindi scambiarli ira loro, MA NON 
VENDERLI. La Systems Editoriale 
tutelerà i propri interessi nei con- 
fronti degli umanoidi che. nonostan- 
te tutto, decidessero di inserire queste 
routine nelle proprie cassette pirata. 

I programmi in linguaggio macchi- 
na, ovviamente, sembrano costituiti 
da un’unica SYS di partenza. Gli e- 
spcrti, caricando un Monitor, po- 
tranno, comunque, disassemblarli 
per esaminarli con comodo a vo- 
lontà. 

L’intervento dei lettori 

La novità principale, però, consiste 
nel sollecitare il lettore a sofisticare 
alcuni dei programmi inseriti in "Di- 
rectory" e ad inviarne una nuova ver- 


di Alessandro de Simun e 

sione. Questa, dotata* ad esempio, di 
più opzioni, oppure più veloce o. in 
una parola, “migliore” di quella con- 
tenuta nel dischetto che proponia- 
mo, verrà inserita in un numero suc- 
cessivo di “Directory” disponibile 
per ulteriori miglioramenti da parte 
di altri lettori; e cosi via in una gara 
che se, da una parte, consente la dif- 
fusione di software via via più poten- 
te, dall’altra costituisce una validissi- 
ma palestra per quei lettori che non 
chiedono di meglio che migliorare la 
propria bravura alla tastiera. 

Come primo “esercizio” sugge ria- 


Come procurarsi 
"Directory” 

Aprimmo I lettori che NON è asso- 
lutanwnie possibile inviare i programmi 
su nastro, per intuibili motivi di econo- 
mìa ed affidabilità del nastro cassetta. 

“Directory’ può quindi esser richie- 
sta solo su disco invi andò DlZUÙO + 
3000 per le spese di spedizione. 

Non et è possibile inviare materiale 
contrassegno, 

C ompilate un normale modulo di C/C 
postale indi rizzando a: 

C/C postale N. J79522Q7 
Systems Editoriale 
Viale Fa magnata, 75 
20142 Milano 

Non dimenticale di indicare chiaramen- 
te* sul retro dèi modulo (nello spazio in- 
dicato con “Canale del versamento"} 
non solo il vostro nominativo completo, 
ma anche il nome del disco desiderato: 

"Directory N I" 

N.B. Per ottenere il materiale in tempi 
più ristretti* inviate fini porlo a mezzo 
assegno bancario non trasferibile: le po- 
ste italiane non brillano per velocità 1 


mo di razionalizzare il programma 
“Drums (batteria elettronica)* che è 
scritto in Basic ma risulta, in verità, 
piuttosto... disordinato: Applicate, ad 
esempio, i suggerimenti dett i nserto 
“La programmazione modulare” de! 
N .34 di C.C.C 

Visto che ci siete, poi, provate ad in- 
serire qualche altra opzione come, ad 
esempio, la possibilità di memoriz- 
zare due ritmi e di eseguire i l primo. o 
il secondo, a seconda della pressione 
di un tasto. 

Altri suggerimenti 

m 

I lettori, però, possono collaborare 
a “Directory" inviando listini, file e 
altri... "oggetti" informatici che non è 
possibile pubblicare su riviste di car- 
ta. Ecco alcuni esempi, tra i primi che 
ci vengono in mente; 

* Set di caratteri ridefiniti che avete 
realizzato per vostri scopi particolari 
c che nessuna rivista del settore avrà 
mai il coraggio di pubblicare tini ma- 
gi naie la digitazione di 4K le passa) 

di DATA?) 

* Realizzazione di più aprile da far 
apparire in successione per anima- 
zioni, 

* Disegni particolarmente pittore- 
schi eseguiti col Koala, o con altri 
Tool grafici, da caricare in propri 
programmi, 

•Archivi di ogni tipo, realizzati ricor- 
rendo a programmi commercializza- 
ti o a listati di vostra creazione. E- 
sempi; archivi di tutte le colonne vin- 
centi del Totocalcio dal 1980 ad oggi; 
archivi degli articoli apparsi su Com- 
modore Computer Club suddivisi in 
più campì (Giochi, Hardware, Prote- 
zioni, Grafica, Musica eccetera) da 
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utilizzare in unione con “Su permi- 
se", oppure “The Manager" o altri 
ancora. 

* Vocabolari dì centinaia di parole, 
lautissimi da realizzare e da uri li zza- 
re con un Word Processor ricorren- 


do alla funzione Search {oppure 
Find) presente in qualsiasi W, l\è in- 
fatti possibile rintracciare la parola 
cercata fa patto che qualcuno abbia 
realizzato il file-vocabolario,,.) 

Centinaia sono comunque le occa- 


sioni per partecipare a ‘"Directory". 

Prima di inviare il risultalo del vo- 
stro la voto vi consigliamo. però, di te- 
lefonarci per stabilire se risponde ai 
requisiti per leventuale pubblicazio- 
ne (tei 02/8467348) 


0 IH 

1 

9 

1132 

56 

49 

50 

3 

3 

4 
4 

3 

4 
4 
4 

3 

4 
4 
3 
3 

3 

4 

5 
4 
4 
4 

4 

6 

5 

5 

3 

4 

6 

5 
4 
4 

4 

5 
4 

4 
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" 101 
“ 102 
" 103 
"500 
* 104 
" 105 
" 106 


"STARTER PROGRAM" PRO 
"SPIEGA? IONI " SEQ 

“CAGIVA GAME" PRG 

* GHEODAF I AH * PRG 

"CROCKET- PRG 

" MEMO * PRG 

"100 CORNIC P0L24* PRG 
L AMR * V 1 DE 024 " PRG 
ird IV IO PA24* PRG 
I NPUT DEF , 25 " PRG 
BLOCK S FRE35” PRG 
I NCOL « V I RG25 “ PRO 
INPUT C0NT25" PRG 
REVER SCRE25" PRG 
"107 IMPUL/SQN025 " PRG 
"103 CONTR * DATA35 " PRG 
DEC I M/ESA 26" PRG 
FUt42 f PERB2B * PRG 
FUNZ INVER26 41 PRG 
I NVER/TR I G2G * PRG 
IWXIPERB.aS" PRG 
IESAM-P1R EC26* PRG 
ISTOGRAMM 27" PRG 
"115 CAR H I -RE 927 " IPRG 
M 11S SC/S ILLABE27 " PRG 
"117 M1CROCALC * 27 “ PRG 
"118 SAVE MEM0R27 " PRG 
" t 13 SC AM. V IDE 027 " PRG 
"120 KOALA VIDEE? w PRG 
“ I 2 1 PROTEI I0NE28 " PRG 
"122 NUM. CONGR * 28 " PRG 
"500 9L/FRE/2/28" PRG 
"502 CREA RELAT28" PRG 
"503 SCRIVE REL2S" PRG 
*504 LEGGE REL 28" PRG 
"505 DISPERILE 28" PRG 
" ì 23 MCD MCM 29" PRG 
*124 PRINT USIN29" PRG 
"126 TEXT COPY 29" PRG 
•125 C Ab© I A C0L29 m PRG 
*127 FILL bEMQ 29* PRG 


• 109 
■110 
"III 
"112 

* 1 13 
"50 1 
"114 
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4 
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5 

4 
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5 
4 
4 
4 
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5 

4 
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1 0 
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" 128 
■ 139 


130 

131 
134 


■138 
■ 133 

* 1 33 

* I4B 
■14 1 

* 143 
" 1 43 
" 144 
" 145 


BORDO C0L039" FRG 
SCR I T . LAMPE9 * PRG 
SCELTA MEN30" PRG 
SCELTA JOY30" PRG 
P/US1NG/3 31* PRG 
*133 ELAB/STR1N3 1 “ PRG 
■134 PLOT L0W/R31" PRG 
■135 COMANDI FP31" PRG 
*13G FUNZ. EOR 31* PRG 
*137 BIT IMAGE 31" PRG 
EXTE/BACK .31* PRG 
SCREEN PAG3 1 * PRG 
CENTR/MESS32 " PRG 
NOME DISK. 32* PRG 
FINESTRE 33 * PRG 
OROLOGIO 33* PRG 
ZOOM ESAO 33* PRG 
SPR ITE M/U33" PRG 
SCROLL TEX33 * PRG 
*105 INPUT PROG34* PRG 
*148 RUOTA STR.34* PRG 
*147 SLITTA S T . 3 4 * PRG 
“148 SOST. STR 1.34" PRG 
*149 CANC/WIKC. 35* PRG 
*150 FRAM/SCHER35 * PRG 
*151 MESS/LAMP . 35* PRG 
"ORUMS (BATTERIA ) ’ PRG 

"CARICAMI ’ PRG 

■CARATTERI" PRG 

"TURBO SORT PRG ‘ PRG 
"AUTORUN PROGRAMM" PRG 
"CRIPTO PROG* PRG 

■SCROLL CARATTERE " FRG 
“OEMO SCROLL FLG* PRG 
■DEEK L/M" PRG 

“OEMO DEEK ■ PRG 

*OOKE L/M* PRG 

"DEMO DOKE" PRG 

"ATTERRAGG/LUN* PRG 
“PROGRAMMA MOUSE" PRG 
“PRG PADOLE VIC 3* PRG 
8L0CKS FREE. 
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Scrambler (Cripto/2) 


Una versione diversa e più breve di 
quella pubblicata in precedenza 


di Robert» M orassi 



JNon appena pubblicato sul nume- 
ro scorso il programma di protezione 
Cripto’, un nostro lettore ha subito 
provveduto ad inviarne una versione 
che. pur basala su Ilo stesso sistema, è 
molto più breve e si fonda su [futi liz- 
zo della tu n/ ione RND() Riepilo- 
ghiamo. comunque, un po' di teoria 
per 3 lettori che avessero dimenticato 
in che cosa consiste il metodo. 

Un po’ di teoria 

1 no dei possibili metodi di prote- 


zione di un programma Basic è il co- 
siddetto “Sera n ibi ing". vale a dire la 
modifica t menzionale te reversibile) 
di tulli i byte del programma. 

Più che di una protezione, si tratta 
di una “cifratura" che rende lì pro- 
gramma non listatole né eseguibile 
se non dopo adeguata decifrazione 
che ripristini tutti ì byte originali: 
questa implica, ovviamente, la cono- 
scenza del modo con cui il program- 
ma è stato cifralo e di eventuali "chia- 
vi’' di accesso. 


Il metodo standard di ' scranibling ' 
è rOR-csclusivo (I:()R| dei singoli 
byte del programma con un byte di 
riferì mento ( "maschera’ \ 

L'operatore liOR confronta ì hit 
corrispondenti dì due byte, fornendo 
“in uscita ’ un terzo byte i cui bit val- 
gono ”1 se i due bit confrontali sono 
uno "0 e un “I ’\ oppure "ir se i due 
hit confrontati sono entrambi "M" op- 
pure entrambi " 1 ", 
l ale operatore, se applicato una se- 
conda voi la. riporta i byte nel foro 
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stato iniziale; è facile verifica re die 
se A EOR ft=L\ allora C EOR 0- A: 
dò significa die la routine usata per 
cifrare il programma può essere usa- 
ta tal quale per decifrarlo. 

A tale scopo è ovviamente necessa- 
rio conoscere il valore che è stato usa- 
to come "maschera" per fOR-esclu- 
sivo. In teoria, però, tale valore si po- 
trebbe ricavare per tentativi provan- 
do sistemai ica mente tutti i valori da 1 
a 255 tino ad ottenere un LIST 
corretto. 


La versione proposta 

La routine SO* AM di queste pagi- 
ne effettua lo se nimbi ingeriti una va- 
riante del metodo descritto* legger- 
mente più... perfida: fEOR viene fat- 
to non con un solo byte -maschera, 
ma con quattro byte diversi che si ai- 
ternano ciclicamente. 

Questi vengono letti nei registri 
[40- 145, die contengono, di norma, il 
seme " usato dall istruzione Basic 
RND: poiché tale seme è determina- 
lo univocamente se si è eseguita urn- 
struzione RNDeon argomento nega- 
tivo. si ha una chiave di accesso per- 
sonalizzata senza la quale non sarà 
possibile ricostruire il programma ci- 
frato, neppure avendo SCRAM a di- 
sposizione Vediamo come si usa in 
pratica. 


Come usare Scram 

* Digitate e salvate SCRAM. poi date 
il RI IN per caricarlo in memoria a 
parti re dal registro 491 52 (la routine c 
comunque completamente ri Incubi le 
senza modifiche). 

* Date il NEW* poi caricate in memo- 
ria il programma che volete di rare. 

* Date il comando X RND(-N). so- 
sti luendo ad "N"un numero, intero o 
decimale, a vostra scelta; questo rap- 
presenterà la vostra “chiave" perso- 
nale di deci! razione (attenti a non 
dimenticar! a!). 

* Infine digitale SYS 49 1 52, Potete ve- 
rificare con un LIST che il vostro 
programma é stato trasformato in li- 
na sequenza di byte privi di senso. 
Ripetete SYS 49152. ed ecco li il vo- 
stro programma pronto a funzio- 
nare? 

* Con SYS 49152 cifrate di nuovo il 
programma, e salvatelo i n questa for- 
ma su supporto magnetico. 

I^a decodifica 

Per usare nuovamente il progra in- 
ni a "protetto", è necessario ripetere 
Iurte le operazioni precedenti e cioè: 

* ricaricare il programma dopo aver 


messo SCRAM in memoria. 

* eseguire X RND( -N ) con lo stesso 
N di prima. 

• impartire il comando SYS 49152, 


Come funziona Scram 

Per quanto riguarda it funzionamen- 
to di SCRAM, è da notare che solo gli 
ultimi byte eseguono lo scrambling 
vero e proprio (cioè LEOR ridico). 
Tutto il resto del programma è dedi- 
cato alle seguenti operazioni: 

* Esclusione dallo scrambling degli 
"zero" di fine linea Basic e dei due 
byte successivi, che costituiscono il 
"link" tra le linee Basic; 

* Inibizione degli "zero" che, even- 
ni alme mtc presenti nei byte die con- 
tengono i numeri di linea, vengano 
scambiati per segnali Jj line finca 

* Impedimento, infine, che eventuali 
"zero" generati dall EOR vengano 
introdotti nel programma citrato. 

Queste precauzioni sono necessa- 
rie per garantire che il “Relink" delle 
linee Basic, che segue automatica- 
mente il caricamento del programma 
da disco o nastro* funzioni nel modo 
corretto: in caso contrario verrebbero 
introdotti nel programma dei byte 
casuali c im prevedibili che ne rende- 
rebbero definitivamente impossibile 
la decifrazione. 


10 REM 3CRAFI6LER 

60 : 

30 REM PROTEZIONE PER C/64 

35 : 

40 REM BY ROBERTO M0RAS5I 
50 REM PISTOIA 
60 : 

180 ; 

130 POR X-0 IO 81: READ Y : POKE 4 
9158+X t Y : A-A+Y : NEXT 
140 IF A0 1E9B1 THEN FRI NT” ERRO 
RE NEI DATA" 

150 END 

160 DATA 165, 043 , 133 , 251 , 185 , 0 
44 , 1 33 , 650 

170 DATA 158, 004, 160,855, 138, 8 
50 , 800 , 830 


100 DATA 851 , 808 , 008 , 830 , 858, 1 
60 , 000 ( 830 

190 DATA 850 , 830 , 851 , 808 , 008,8 
30 f 858 , 056 

800 DATA 165 . 851 , 889 , 045 , 165,8 
58 , 889,046 

810 DATA 144 , 001 , 096 , 177 , £ 51 ( 8 
00 , 014, 164 

880 DATA 850 , 198 , 008 , 048 , 006.8 
30 , 851 ,808 

830 DATA 609 , 830 , 858 , 808 , 805,0 
85 , 139,800 

840 DATA 006 , 164 , 850 , 198 , 008, 0 
16 , 004, 160 

850 DATA 000 , 145 , £bl , £ 08 , 808, 1 
99 , 168,004 

860 DATA 600,195 
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PRIMO ESEMPIO 

1 00 rem pkino esempiu 

150 : 

dm xi= , '":Kbri siringa oi cunuuo 

850 X-0:REM ADDENDO U MINUENDO 
300 Y-0 : REM ADDENDO 0 SOTTRAENDO 
350 : 

400 PR1NICHRSC 147) 

450 PRINT”!/ RODICI ONE " : PR IN T "0/ SOTTRA 
Z I ONE " 

500 FRI NT” CHE COSA UUOI PARE?" 

550 SET XS : I F XS^"' THEN 550 
600 IF X$-”ì” THEN 800 
650 IF X$=-"8” THEN 1000 
700 GOTO 400 
750 : 

800 INPUT "PRIMO ADDENDO” ; X 
050 INPUT “SECON . RODENDO ” ; Y 
900 PR I NT "LA SOMMA UALE "X + Y : END 
950 : 

1000 INPUT "MINUENDO" ; X 
1050 INPUT "SOTTRAENDO" ; Y 
1100 PR 1 NT”D I FFERNZA- "X-Y : END 



SECONDO ESEMPIO 

1000 REM SECONDO ESEMPI □ 

10S0 : 

1100 XS-"":KEn STRINGA 01 COMODO 
1150 X“0 : REM ADDENDO 0 MINUENDO 
1200 Y-0 : REM ADDENDO 0 SOTTRAENDO 
1250 AS“0 : REM CODICE ASCII TASTO 
1300 : 

1350 PRINTCHRSC1473 

1400 PRINF"1/ ADDIZIONE" : PRINT"2/ SOTTRA 
ZI ONE " 

1450 PR I NT "3/ FINE L ADORO" 

1500 : 

1550 GOSUB 2600 

1600 IF XS-”1" THEN GOSUB 1B50:GOTO 1350 
1650 IF X3>-"2" THEN GOSUB 2200: GOTO 1350 
1700 IF XS-”3" THEN END 
1750 GOTO 1350 
1B00 : 

1B50 INPUT "PRIMO ADDENDO" ;X 

1300 INPUT “SECUN. ADDENDO ; Y 

1950 PR I NI "LA SOMMA UALE"X+Y 

2000 GOSUB 2550 

2050 IF AS-13 THEN RETURN 

2100 GOTO 1650 

2150 : 

2200 INPUT "MINUENDO” ; X 
2250 INPUT "SOTTRAENDO"; Y 
2300 PRINT "DIFFERENZA-"X-Y 
ÌÉ350 GOSUB 2550 
2400 IF AS-13 THEN RETURN 
2450 GOTO 2200 

2550 FRI NT "TASTO RETURN-MENU" 

2600 FRI NT "PREMI IL TASTO” 

2550 GET XS : I F X$-"" THEN 2650 
2700 AS-ASCCXS») : RETURN 



TERZO ESEMPIO 


1000 REH TERZO ESEMPI 0 
TOSO : 

1100 XS-”" :REM STRINGA DI COMODO 
1150 X-0: Y-0: REM ADDEN/M I N/FA f I /U IUI U . 

1 £00 AS“0 : REM CODICE ASCII TASTO 
1250 SO“0:REM ULTIMA ELABUR . COMP I U T A 
1300 : 

1350 REM *** MENU PRINCIPALE **• 

1400 PRINTCHKSC 147) 

1450 PRINT‘ J 1/ AD0IZ1UNE": PRIN1 ”£/ 5U1IHA 
Z I ONE " 

1500 PR I NT”3/ MOLTIPLICAZIONE” : PK1NT"4/ 
DIVISIONE' 1 

1550 PRINT”F/ FINE LAUORO ” : PR I NT 
1600 GOSUB 3000 

1650 IF X$-"l” THEN GDSUB 2050:6010 1400 

1700 IF XS“ "S” THEN GOSUB 2500 : GOTO 1400 

1750 IF X$* ”3” THEN GOSUB 3250 : GOTO 1400 

1000 IF ”4 " THEN GOSUB 3700: GOTO 1400 

1850 IF XS-"F” THEN END 

1300 GOTO 1400 
1350 : 

£000 REM *** SOMMA *** 

£050 PRINT: INPUT "PRIMO ADDENDO X$ : I F X 
S="SO ” THEN X = SO : GOTO £150 
£100 X=UALCXS) 

£150 INPUT "SECON .ADDENDO” ; Y 

££00 SG=X+Y : PRINT"LA SOMMA UALE"SO 

££S0 GOSUB £3S0 

£300 IF AS-13 THEN RETURN 

£350 GOTO £050 

£400 : 

£450 REM *** SOTTRAZIONE *** 

£500 PRINT: INPUT "MI NUENDO” ; X£ : 1 F XS-"SG 



” THEN X-SO:GOTD 2600 
2550 X-UALCXS) 

2600 INPUT "SOTTRAENDO”; Y 

2650 SO-X-Y: PR INT ”UI FFEREN2A- "50 

2700 GOSUB 2950 

2750 IF AS-13 THEN RETURN 

2800 GOTO 2500 

2850 : 

2900 REH ESAME TASTO PREMUTO *+* 

2950 PRINT"TASrO HETUKN-MENU" 

3000 FRI NT "PREMI IL TASTO" 

3050 GET X$ : I F X£-"" THEN 3050 
3100 AS-ASCCXSI : RETURN 
3150 : 

3200 REM *** MOLI IPLICA2 IONE *** 

3250 PRINT: INPUT "PRIMO FATTORE X$ : I F X 
S-"SQ ’’ THEN X“SO : BOTO 3350 
3300 X-UALCXST 

3350 INPUT ”5EC0N , FATTORE ” ; Y 

3400 SO“X*Y: PRINT "PRODOTTO: "SO 

3350 GOSUB 2950 

3500 IF AS=13 THEN RETURN 

3550 GOTO 3250 

3600 : 

3650 REM *** D IUI SI ONE *** 

3700 PRINT: INPUT ”D I U I DENDO " ; XS : I F X$="S 
0" THEN X-SO:GOTO 3600 
3750 X-UALCXSI 

3800 INPUT "UIUISORE” ; Y : IF Y=0 THEN 3600 

3050 SD”X/Y : PRINT "QUOZIENTE : "SO 

3900 GOSUB 2950 

3950 IF AS-13 THEN RETURN 

4000 GOTO 3700 



QUARTO ESEMPIO 

1000 REH QUARTO ESEMPIO 
1050 : 

1100 X$=" ” : RED STRINGA DI COMODO 
1150 X-0:Y-0:REM ADOEN/MIN/FATT/DIUID . 
1800 2-0: REM OARI ABILE DI COMODO 
1550 AS— 0 : REM CODICE ASCII TASTO 
1300 SO— 0 : REM ULTIMA ELA8QR . COMPIUTA 
1350 DIM X (. 9 ) : REM UETTORE DI MEMORIE 
1400 : 

1450 : 

1500 REM *** MENU PRINCIPALE *** 

1550 PRINTCHRSC 147} 

1500 PRINT " 1 / ADDIZIONE” : FRINII/ SOTTRA 
2 IONE" 

1650 PRINT ”3/ MOLTIPLICAZIONE” : PRINT”4/ 

0 I U I S I ONE ” 


1700 

PRINT: PRINT”A/ 

AIUTO 

*' : PRINT ”F/ 

FINE 


L ADORO ” : 

PRINT 




1750 

GOSUB 3350 




1800 

IF 

XS- " 1 " 

THEN 

GOSUB 

8300: GOTO 

1550 

1050 

IF 

xa-”e” 

IHEN 

GOSUB 

8000: GOTO 

1550 

1S00 

IF 

XS- " 3 ” 

THEN 

GOSUB 

3050: GOIQ 

1550 

1950 

IF 

XS- "4 ” 

THEN 

GOSUB 

4150: GOTO 

1550 

8000 

Ut 

i — 4 

X$- "A” 

THEN 

GOSUB 

5550: GOTO 

1550 

E050 

IF 

XS- ” F " 

THEN 

END 




5100 GOTO 1550 
E 150 : 

EE00 : 

8850 REM **+ SOMMA *** 

E300 PRINT: PRINT"PRIMO ADDENDO” GOSUB 5 
800 

8350 INPUT ”SECDN. ADDENDO” ; Y 
E400 SO-X+Y: PRINT "LA SOMMA ^ UAL E "SO 
8450 GOSUB 3300 



2500 IF AS = 13 THEN RETURN 

esse if xs-"rr then gosub 4550 

5600 GOTO 5300 
5650 ! 

5700 : 

5750 REM "** SOTTRAZIONE *** 

5800 PR I NT : PR I NI ”M 1 NUENLIG ” ; : GOSUB 5500 

2050 INPUT "SOI TRAENDO" ; V 

5S00 SO-X-Y : PR INT ”01 FFERENZA" "SO 

5950 GOSUB 3300 

3000 IF AS-13 THEN RETURN 

3050 IF XS-*‘M" IHEN GOSUB 4650 

3100 GOTO -5800 

3150 ; 

3200 : 

3550 REM *** ESAME TASTO PREMUTO **« 

3300 PR I NT "TASTO REIURN-MENU” 

3350 PR INT "PREMI IL TASTO” 

3400 GET XS:IF X$-”” IHEN 3400 
3450 AS-ASC(XS) : RETURN 
3500 : 

3550 : 

3600 REM *** MOLTIPLICAZIONE *** 

3650 PRINT : PR INT” PRIMO FATTORE GOSUB 5 
200 

3700 INPUT "5EC0N .FATTORE” ; Y 

3750 SO-X*Y: PRINT "PRODOTTO: "SO 

3600 GOSUB 3300 

3050 IF AS-13 THEN RETURN 

3900 IF X$- " M“ THEN GOSUB 4650 

3950 GOTO 3650 

4000 : 

4050 : 

4100 REM *** DI U I S I ONE *•* 

4150 PRINT: PRINT "DIOIDENDO” ; : GOSUB 5200 
4200 INPUT “DIUISORE” ; Y : IF Y-0 THEN 4200 
4250 SO-X/Y: PRINT "QUOZIENTE: "SO 



4300 GOSUB 3300 

4350 IF AS-13 THEN RETURN 

4400 IF XS-”TV* THEN UQSUB 4b50 

4450 GOTO 4150 

4500 : 

4550 : 

4500 REH *** flEnDR I ZZAZ I ONE *** 

4650 PRINT : FDR Z“0 TO 9: PRÌNI "flEH . ’’Z; X(Z 
3 : NEXT: PRINT 

4700 PRINT: INPUT "DUALE HEHURIA t.0/93”;X 
: I F X<0 OR X>9 THEN RETURN 
4750 XCX 3 -SO: RETURN 
4800 : 

4050 : 

4900 REM *** RI OHI Ano MErtOR 1 A *** 

4950 PRINT: INPUT "QUALE MEMORIA C0/3J";X 
: IF X<0 OR X>9 THEN RETURN 
5000 V-XCX3 : RETURN 
5050 : 

5100 : 

5150 REO *** ESAHE INPUT *** 

SE00 INPUT XS : I F XS-"SU” THEN X-SU:RETUR 
N 

5E50 IF XS-"n” THEN 5350 
5300 X-UALC XS 3 : RETURN 

5350 PRINT; FOR Z-0 TU 3 : PRINT " ritti . ”Z ; XCZ 
3 : NEXT: PRINT 

5400 PR INI “QUALE?” ; : GOSUB 3400: IF XS<”0” 
OR X$>"3” THEN REIURN 
5450 PRINTXS : X-XCUALl XS3 > : RETURN 
5500 : 

5550 : 

5500 REM *** LETTURA FILE DI AIUTO *** 
5650 OPEN O.B.tì, "AIUTO, S.R” 

5700 GEI XS:IF XS THEN CLOSE 0: RETURN 
5750 IF ST THEN CLOSE tì: RETURN 
5B00 GEI #8, XS: PRINTXS; : GOIU 5700 
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Tutto sugli sprite 


E' giunto il momento di conoscere bene 
gli sprite. Dunque : c’era una volta... 
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l_Jh sprite (folletto, shape. figura o come 
dir Ai voglia) è una delle numerose opzio- 
ni che il C ommodore 04. attraverso il suo 
chip video VtC II. può gestire. 

Ne possono essere presenti fino ad otto 
contemporaneamente sullo schemi», ma- 
novrati in dipendentemente l'uno dall'al- 
tro e visualizzati con modi grafici diversi. 

L'importanza degli sprite nella pro- 
grammazione di figure in movimento è 
stata, insieme alle altre possibilità grafi- 
che c sonore del C/64 r I eie me n to determi- 
nante che ha portato questo computer ad 
avere la più grande disponibilità di 
software ludico. 

Far muovere, infatti, una figura sullo 
schermo, fornendo solo le coordinate 
d’arrivo (e senza preoccuparsi perciò che 
possa succedere "sotto’ lo sprite). ò estre- 
mamente più facile e rapido che attuarlo 
via software (si pensi alio Spectrom o 
al L7 1 6), 

La figura animata (sprite) è composta 
da 24x^1 pixel i Pitture E Le meni unità 
figurativa) visualizzabili anche in multi- 
color ed espansi secondo a due assi 
cartesiani 

Ma non ò finita: il singolo sprite ha, in- 
fatti. due tipi di priorità di visualizzazio- 
ne: quella verso il fondo e quella versogli 
alrn sprite. 

Intervenendo sul primo tipo di priorità 
si può stabilire se lo sprite deve "coprire" i 
caratteri su cui passa, oppure se deve esse- 
re “nascosto" da questi ubimi. 

Il secondo tipo di priorità è. invece, fissa 
e non si può modificare riguarda gli otto 
sprite insieme, regolandone la visualizza* 
zinne secondo il numero del singolo spo- 
le: quello di numero più basso coprirà 
quello di numero più alto. 

Lo sprite, inoltre, può essere visualizza- 
to su ogni tipo di schermo, in alla o bassa 
risoluzione, in mullicolor o sui cara Iteri 
ridefmiti Quella ulteriore caratteristica è 
stata riportata per ultima ma, a nostro av- 
viso, è la più importante 

Procederemo con ordine fornendo, via 
vìa. gli elementi necessari alta definizio- 
ne e all uso degli sprite 


La costruzione degli sprite 

Prima di visualizzare uno sprite lo si 
deve ovviamente definire, ossia si deve 
memorizzare, da qualche parte, la sua 
“immagine" tradotta in un gruppo di 
numeri, 

Come abbiamo già affermato, lo spntc 
è tonnato da una matrice di 24 pixel oriz- 
zontali c 21 verticali. 

La memoria del C/64 è costituita da diver- 
se decine di migliata di byte ì quali, a loro 
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volta, sono composti da 3 bit ciascuno. 

Questi bit possono valere soltanto 0 op- 
pure 1 e possono facilmente essere identi- 
ficati con il singolo pixel: se il pixel £ ac- 
ceso, il bit corrispondente vale l, altri- 
menti vale 0. 

Annesto punto, facendo riferimento al- 
la figura 1, possiamo notare che la griglia 
è ulteriormente suddivisa in tre colonne 
da otto pixel ciascuna. 


Queste colonne individuano i tre byte 
occorrenti per ciascuna riga dello sprìte; 
siccome questo è composto da 21 righe, 
occorreranno 63 (21x3) byte per memoriz- 
zarlo. 

Riepilogando: per costruite l'immagine 
di uno spritc, £ necessario: 

• disegnane una matrice di 24x21 elementi, 

• definire t cornami della figura scelta 

• annerire le celle corrispondenti. 

In seguito dovremo calcolare i valori dei 
63 byte; questi sono espressi in binario in 
quanto le 8 cifre (bit) costituenti ogni byte 
possono valere solo 0 e I . 
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Ora non ci metteremo certo a trattare la 
teoria dei numeri in base 2 o binari (del 
resto Targomento è stato trattato ampia- 
mente sul numero di febbraio 86 nel pri- 
mo articolo della serie LA GRAFICA 
DEL C/64) ma daremo solo indicazioni 
valide in questo specifico caso. 

Il nostro problema £ quello di “tradur- 
re" in notazione decimale i gruppi di 8 
pixeLbibcifre che compongono i 63 byte 
da memorizzare. 


La regola pratica è molto facile da at- 
tuare poiché si basa su un algoritmo 
semplicissimo. 

Basta, infatti, dare una posizione agli 
otto bit numerandoli da sinistra a destra, 
corri i n ci andò da 1 n omero 7 e decresce n do 
fmo aO, Poi si considera, per ogni bit, una 
costante K il cui valore è dato daìlespres- 
aione: 

K=*21 P 

dove P è la posizione del bit trovato 

prima. 


Così facendo troveremo 8 valori che sa- 
ranno associati ai bit nel modo seguen- 
te: 


Pos, 

Val 


7 

128 


6 

64 


5 

32 


4 

16 


3 

8 


2 

4 


1 

2 


0 

I 



L'uluma operazione da effettuare con- 
siste nell eseguire una somma i cui ad- 
dendi siano costituiti da tutte e sole le co- 
stanti calcolate predentcmentc la cui po- 
sizione contenga un bit di valore uno, os- 
sia una casella del disegno annerita. 

Per maggiore chiarezza riferiamoci alla 
tredicesima riga dello spole di figura 1 
composta, come tutte le altre, da tre 
byte affiancati. 

I valori dei tre byte sono ricavati dalle 
somme seguenti: 

0+64+32+ 16+8+0+0+0’ 120 
0 + 0 + 0 + 0 + 0 + 0 + 0 + 1 « 1 
0 + 0 + 0 + 0 + 8 + 0 + 0+0 - 8 

Ufi zeri, benché superflui, sono stati in- 
seriti per meglio evidenziare la funzione 
che assumono i pixel anneriti oppure 
"chiari" identificali con i hit di valore 1 eO 
rispettivamente. 

Analogamente si ricavano i valori dei 
restanti 6<) byte, la cui successione, confò 
intuibile, procede da sinistra verso destra 
e daLlaLlo verso il basso. 

Questa operazione può sembrare al- 
quanto lunga c noiosa ma, in genere, si 
incontreranno molti byte vuoti o 
pieni ( = 255) ed alcuni con La slessa confi- 
gurazione di bit. 


I puntatori 

Una volta calcolati i 63 valori da asse- 
gnare ad altrettanti byte consecutivi, biso- 
gna trovare un area dì memoria esente da 
influenze esterne (ossia non riservali! al 
sistema operativo) che funga da "conteni- 
tore" per questi byte. 

Come vedremo meglio in seguito, l'In- 
dirizzo iniziale di quest'area deve essere 
un multiplo della costante 64 (ossia 0, 64, 
128, 192, 256, e cosi via). Un altra impor- 
tante restrizione da imporre alla zona da 
ricercare consiste nel non oltrepassare 
t'indirizzo 16383, ma cambiando banco 
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di memoria, si può facilmente superare 
questo ostacolo, A tal proposito si consi- 
glia [ articolo: “La gestione dei quattro 
banchi di memoria” pubblicato sul N.32 
di Commodore Computer Club. 

Procedendo nella ricerca attraverso la 
mappa di memoria* troviamo due aree 
che soddisfano le regole sopra enunciate; 
la prima va da 7t)4 a 767 e può contenere 
un solo sprite, mentre la seconda si esten- 
de da K32 a 11)23 e può contenere ben tre 
sprite. Quesf ultima area non é libera ne) 
senso stretto della parola, ma è adibita a 
buffer temporaneo del registratore. IV ob- 
bligatorio, periamo, risistemarvi i dati ri- 
guardanti gli sprite ogniqualvolta si fa u- 
so di questa periferica dal momento che 
vengono cancellati ogni volta che si uti- 
lizza il registratore. 

In realtà dò non costituisce un vero 
problema in quanto una volta letto il pro- 
gramma che gestisce gli spntc, ri registra- 
tore non viene, in genere* adoperato per 
altre operazioni. Chi possiede il drive per 
dischetti, ovviamente, non lui di questi 
problemi (ci mancherebbe altro!) 

Qualora dovesse rendersi necessario 
fuso del registratone, è consigliabile tra* 
sferire prima i dati degli sprite in un'arca 
protetta (va benissimo quella da 49152 a 
53247)* poi utilizzare la periferica e* infi- 
ne, ritrasferire l'Immagine codificata nel- 
le locazioni originali. 

Come si è visto, abbiamo trovalo spazio 
sufficiente per soli quattro sprite Sarebbe 
possibile riservare spazio a partire dalla 
locazione 2048 (agendo su alcuni punta- 
lori) ma il discorso, oltre ad essere al- 
quanto impegnativo e Inori argomento, è 
staio imitato esaurientemente nel fa muo- 
io dedicato alla grafica pubblicalo sul nu- 
mero 30 di Commodore Computer 
Club. 

Ma il nostro lavoro non è ancora con- 
cluso: infatti non basta memorizzare da 
qualche parte i dati riguardanti gli sprite, 
ma bisogna indicare al VIC II DOVE so- 
no situati questi ultimi. 

Per ogni sprite esiste una locazione, 
compresa tra 2040 e 21147. che lo indirizza, 
fungendo da puntatore; allo sprite 0 é ab- 
binata la locazione 2040, allo sprite 1 la 
204) JInoallospritc7chehLi il suo punta- 
tore in 2047, 

Il valore P da assegnare a ciascun pun- 
tatore è dato dalla formula: 

P- 1/64 

in cui 1 è la locazione contenente il primo 
byte dello sprite considerato e a questo 
punto si capisce perché 1 deve essere un 
multiplo di 64. 

Ricorriamo ad un esempio: supponia- 
mo di aver memorizzato t 63 byte dello 
sprite N.3 a partire dalla locazione di in- 
dirizzo 960, Il valore da depositare in 2U43 


corrisponde a 1 5 (96(1/64 I 5) e. pertanto, 
dovremo eseguire 
POKE2043, 1 5 

hi definitiva se cerchiamo di memoriz- 
zare i 63 byte di uno sprite a partire da un 
indirizzo non multiplo di 64, rischiamo 
di vederne apparire solo una parte, dato 
che il VIC 11 "ragiona", per ciò che con- 
cerne gli aprile, a blocchi di 64 byte 

Il registro di abilitazione 

Questo registro (il registro è una loca- 
zione di memoria mappa tu in un chip di 
I/O come il VIC II)é localo in 53269 ed è 
chiamato Sprite E nubi e Resister (registro 
di abilitazione sprite). 

Come tutte le 65536 locazioni del C-6 4* 
anche questa è composta da otto bit Im- 
maginarne la funzione è estremamente 
semplice; ogni bit è abbinalo allo sprite il 
cui numero d'ordine è equivalente alla 
posizione, o peso, del hit stesso, 
ossìa quello più a sinistra, rappresenta lo 
sprite 7 c COSÌ via 

Ponendo a I un certo bit di questa loca- 
zione, si dà al VIC II il "permesso" di vi- 
sualizzare sullo schermo lo .sprite impli- 
calo. 

La traduzione in stridimi di quanto so- 
pra descritto è presto latta; bisogna 
eseguire: 

POKE 53269, PEEK (53269) OR (2 1 S7 
doveS rappresenta il numero dello sprite 
di cui si desidera la visualizzazione. 

Viceversa, per "spegnere" un cerio apri- 
te, sarà necessario digitare: 

PORE 53269. PEEK (53269) AND (255- 
2 tS) 

m cui S assume il solito significato. 

1 colorì 

Una volta disegnato, tradotto in byte, 
memorizzato, localizzato e visualizzato, 
unosprircha bisogno di una veste croma- 
tica che gli permetta di risaltare o di mi- 
metizzarsi con lo sfondo, a seconda 
delle situazioni. 

Come per la grafica in alta risoluzione, 
vi sono due modi per visualizzare i colori 
di uno sprite: normale e multi color. 

Per stabilire che un determinato sprite 
dovrà essere visualizzato in minio nor- 
male, sarà sufficiente porre a zero il bit 
corrispondente (la relazione tra bit e spri- 
te è la stessa di quella valerne nel registro 
di abilitazione) mediante la seguente 
istruzione: 

PURE 53276. PELK (53276) AND (255- 

2 | S7 

dove S assunte ancora il ruolo di numero 
sprite (dora rilavanti non sarà più ripetu- 
ta questa precisazione), 


Lina valla posto uno aprile in modo 
normale, bisogna assegnargli un colore 
tra i sedici possìbili 

Il codice del colore set* Ilo (vedere frip 
pendice relativa nel manuale dd compu- 
ter) dovrà essere depositato nella locazio- 
ne il cui indirizzo é dato da 532X7 + 5 
eseguendo: 

POKE 5 32X7 + SA C 

dove CC è il colore da assegnare allo spn 
te S. 

Il colore depositato in queste locazioni 
sarà assunto dalle celle dei disegno che a- 
ve vanto annerito (ossia i hi! posti a 1); le 
celle della griglia rimaste chiare avranno 
il colore dello sfondo. 

Se si desidera attivare d modo ni ubice- 
li pf per un determinato sprite, dovremo 
eseguire; 

POKE 5jm. PEEK <5327(,) OR (2 I S7 
Per quanto concerne questo modo di vi- 
sualizzazione, daremo per scontalo che 
chi legge queste righe conosca sufficien- 
temente il suo funzionamento in genera- 
le. Si è preferito tralasciare questi dettagli 
in quanto si sarebbe dovuto rifare il di- 
scorso riguardante il disegno dello spi ite, 
appesantendo molto lattico lo, peraltro 
già sostanzioso 

A beneficio di coloro che rientrano nel- 
la categoria sopra definita, facciamo no- 
tare che tutto quanto viene esposto è vali- 
do anche per il modo multicolor, ad ecce- 
zione, naturalmente, di ciò che segue in 
questo paragrafo 

l quattro possibili colori dello sprite ab- 
binali alle coppie di hit 1)0.01, 10, 11, sono 
dati, rispettiva mente, dallo sfondo, dai re- 
gistro mullìcolqr I (5 32X5 1, dal registro 
colore (532X7 + Si e dal registro multieolor 
2 (53286). 

Si noli che i due registri multieolor sono 
uguali per tutti gli otto spine 


I a* espansioni dimensionali 

Urialtra delle già numerose opzioni è 
quella che consente di ingrandire un de- 
terminato sprite in senso verticale, oriz- 
zontale e in entranti! i sensi. 

L'espansione avviene raddoppiando le 
dimensioni di ciascun pixel senza, per 
questo, raddoppiate la risoluzione 

Vi sono due registri, adibiti allo scopo, 
locati in 5327 1 e 53277: ri primo permette 
l'espansione dello sprite in verticale, il se- 
condo in orizzontale. 

Come per altri casi già visti, si ottiene 
l'espansione verticale dello sprite S me- 
diante la seguente istruzione: 

POKE 5327 L PEEK (53271 ) OR (2 t S7 
mentre l'espansione orizzontale avviene 
eseguendo: 

POKE 53277, PEIK (53277) OR (2 I S7 
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Viceversa, per ottenere la normalizza* 
-Mime verticale e orizzontale, bisogna esc* 
giure, rispettivamente: 

POKE 53271, PEEK (53271) AND (255- 

2t S7 

e 

POKE 55277. PF.F.K (53277) AND (255- 
2 * S7 

In priorità 

Prima Ji passare alla fase conclusiva, 
l'ultimo argomento da trattare è quello 
della priorità dello spole rispetto allo 
sfondo. 

Pare una priorità maggiore ad uno 
spritc + significa che. ogniqualvolta esso 
verrà posizionato (vedremo fra poco co- 
me) nella stessa arca grafica occupata, 
per esempio, dal carattere “A", lo sprite 
apparirà sopra ’ la "A", ossia la nascon- 
derà. 

Viceversa, assegnando una priorità 
maggiore allo sfondo, lo stesso sprite ver- 
rà nascosto dal carattere. Tacendo sem- 
brare che sia quest uiamo a stargli "da- 
vanti o "sopra" come dir si voglia. 

Per dare allo sprile S una priorità più bas- 
sa. basterà digitare: 

POKE 53275. PEEK (53275) OR (2 1 S? 
mentre, per ottenere feffetlo contrario, 
dovremo eseguire: 

POKE 53275, PEEK (532751 AND T255- 
2] S7 

Oltre alia priorità tra sprite e sfondo, esi- 
ste anche tra sprite e sprite un grado di 
priorità Questuiti ma, come già detto, 
non è modificabile dal l'utente ma si basa 
sul numero d'ordine degli sprite m causa: 
lo sprite che ha numero d'ordine più bas- 
so avrà priorità più alla c nasconderà l’al- 
tro sprite. 

Di conseguenza lo sprite che, in assolu- 
to. sarà visualizzalo sempre sopra lutti gli 
altri, sarà il numero 0; viceversa il nume- 
ro 7 sarà sempre nascosto dai rimanen- 
ti. 


Il posizionamento 

sullo schermo 

Lo schermo che l'integralo V1C 11 co- 
struisce è composi» da 320 pixel orizzon- 
tali per 200 verticali 

Uno sprite può assumere qualsiasi po- 
sizione alTintemo di quest'arca c anche, 
come vedremo, all’esterno di essa. 

Prima di continuare nel discorso, preci- 
siamo che lo schermo è considerato dal 
ViC 11 come un piano le cui dimensioni e 
posizioni sono quantizza le da uno sitano 
sistema di riferimento cartesiano ortogo- 
nale avente origine nei punto in alto a si- 
nistra e i cui assi sono finiti e discreti, os- 
sia accettano come coordinale solo interi 
positi vi varianti, nel caso delle ascisse, da 
0 a 319 e. nel caso delle ordinate, da 0 
a 199, 

Un’altra particolarità di questo sistema 
(la si può estrapolare dalle precedenti in - 
die azioni) Consiste nel fatto che. in prati- 
carsi ha a disposizione un sole quadrante 
il cui asse Y è positivo verso il basso. 
Una volta completate tutte le premesse 
teoriche possiamo, finalmente, vedere co- 
me si posiziona uno sprite sullo scher- 
mo. 

Per definire la posizione di uno sprite 
abbiamo bisogno di due numeri, di cui il 
primo rappresenta la posizione orizzon- 
tale (ascissa) e l'altro la posizione vertica- 
le (ordinata) 

Incominciamo con qucstultima Ogni 
sprite, com'era prevedibile, ha delle loca- 
zioni di memoria che indicano le coordi- 
nale alle quali esso viene visualizzato. 

La locazione LY che funge da deposito 
per l'ordinata di uno sprite 5 è data 
dall'espressione: 

LY = 53249+(2*S) 

Ad esempio, l'ordinata dello sprite 5 è 
depositata nella locazione 53259 ( - 53249+ 
(2*5)). Variando il valore di questà loca- 
zione lo sprite, se è stato precedentemente 
abilitato, si munverà automaticamente 
lungo l asse Y 


Incrementando o decreme mando pe- 
riodicamente e con una certa velocità una 
o entrambe le coordinale, si avrà l'im- 
pressione che lo sprite si muova con moto 
continuo. 

Per stabilire la coordinala Y di un certo 
sprite S è sufficiente eseguire 
POKE 53249 +(2*S),Y 

Naturalmente, una volta stabilite le co* 
stanti S ed Y la POK! 1 risulterà meno 
complessa. 

Prima dì procedere coti Pesame della 
coordinala X, dovremo fare una impor- 
tantissima considerazione: come sappia- 
mo, lo schermo ha 200 pixel verticali, ma 
hi Y di uno sprite può valere da 0 a 255; 
come si conciliano queste due cose? 

in cominciamo col dire che le coordina- 
le di uno sprite sì riferiscono ai suo pixel 
in alto a sinistra. 

A questo punto fa rea no è presto spiega- 
lo: assegnando alla coordinala Y valori 
troppo ahi o troppo hassi lo spole si 'na- 
sconde", parzialmente o per intero, sotto i 
bordi superiore o inferiore 

Per uno sprite non espanso vertical- 
mente, il valore minimo da assegnare ad 
Y perchè si veda almeno la sua uSlima ri- 
ga è 30. Ciò vuol dire che dando ad Y il va- 
lore, per esempio, 28 lo sprite è totalmente 
nascosto dal bordo supcriore. 

Il massimo valore che si può attribuire 
ad uno sprite non espanso affinchè si ve- 
da per intero è 229, Al di sopra di questo 
limite, lo sprite corri incerò a scomparire 
sotto il bordo inferiore dello schermo. 

Il discorso, per quanto riguarda il posi- 
zionamento orizzontale, si fa leggermen- 
te più complesso in quanto implica due 
locazioni di memoria. Questo è dovuto al 
fatto che con gli olio hit contenuti in un 
byte sì possono rappresentare 256 (2 t 8) 
valori, mentre il valore massimo dell’a- 
scissa di schermo è 319. 

Per ovviare a questo secondo inconve- 
niente è stata approntata un'altra locazio- 
ne che contiene il nono bit (virtuale Ideila 
posizione X di ognuno degli otto sprite 


10 FDR I - B32 TO 353: POKE 1.255: NEXT 
20 POKE 2040 , 13: POKE 2041,14 

30 POKE 53271,0: POKE 53277,0: POKE 53276,0: POKE 53264,0 
40 POKE 532B7.1: POKE 5323H.0: POKE 532B0.0: POKE 532B1 , 12 
50 POKE 53246,150: POKE 53243, 130 
60 POKE 53250,150: POKE 53251,130: POKE 53263,3 


Figura 2: Listato BA5IC che abilita gli sprite 0 e 1 e li 
pana al centro dallo scherma. 


4Q Commodore Computer Quò 




GRAFICA 


In questo modo si avranno addirittura 
512 (2 |97 possibili posizioni orizzontali 
per ogni singolo sprite, La locazione 
53264 è adibita a contenere gli otto "noni" 
bit associati ai corrispondenti sprite. 

Senza entrare in ulteriori dettagli tecni- 
ci, diremo solo che* per assegnare un va- 
lore X alio sprite S, va risme da 0 a 5 1 ì , ba- 
sta digitare le seguenti istruzioni in un'u- 
nica linea di comandi Basic: 

AX% - X/256: POR E5 3248 +{2*S)*X- 
(AX%*256): 

K)KF,532M,PEEK(532ó4)ORAX% , (2 ! S7. 

B‘ una linea piuttosto lunga, ma sosti- 
tuendo le costanti X ed S e ricalcolando le 
espressioni interne si accorcerà di 
molto. 

Anche in questo caso, k X assegnabili 
superano di gran lunga le coordinate di 
schermo orizzontai i. Assegneremo* per- 
tanto* alcuni dei Umili ai quali deve sotto- 
stare l’ascissa di uno sprite affinchè sia vi- 
sualizzato in parte o per intero. 

Per essere almeno in parte visibile, la 
coordinata X deve risiedere ndl T interval- 
lo chiuso di valori che vanno da ì a 343 
(parliamo di sprite non espansi), 

E dati che abbiamo fornito, riguardanti i 
limiti di visualizzazione, non sono com- 
pleti nè, per ovvie ragioni di spazio, po- 
trebbero esserlo, Ma questo deve essere u- 
no sprone per i lettori che desiderano sa- 
perne di più. 

Per incentivare maggiormente gli inte- 
ressati nella ricerca di questi limiti* dia- 
mo qui di seguilo alcuni consigli: 

3) digitare ed eseguire il programmino di 
figura 3; 

2) se tutto procede bene* dovrebbero ap- 
parire due sprite a forma di rettangolo 
pieno al centro dello schermo: quello 
bianco è il numero 0. quello nero è il nu- 
mero 1; 

3) per trovare i valori limile per i quali li- 
tio sprite si vede, non si vede o si vede par* 
/talmente, muovete uno dei due sprite 
mediante le lince sopra indicate digitate 
in modo diretto, prendendo nota dei valo- 
ri trovati: 

4) espandete, sempre per mezzo di istru- 
zioni in modo diretto* lo sprite nei diversi 
modi possibili e ripetete le operazioni de- 
scritte nel punto 3. 

5) Per sperimentare le diverse priorità 
sprìte-sprite e sprite-s fondo» muovete en- 
trambe gli sprite uno sopra (sotto) l’altro e 
sopra (sotto) caratteri digitati precedente- 
mente; ancora una volta è consigliabile 



digitare in modo diretto le istruzioni rela- 
tive alle varie azioni- 


Gli scontri (incontri) 
degli sprite 


Abbiamo riservato 1 ultimo posto a que- 
sto argomento in quanto T utilizza/ ione 
di questa performance" per mezzo del 
Basic è alquanto difficoltosa c rallenta ul- 
teriormente la (già di per sò ; lenta gestio- 
ne degli sprite- 

Purtuttavia* ci siamo sentiti il dovere di 
trattare questo argomento in quanto, oltre 
a completare quella che è voluta essere li- 
na descrizione generale del funziona- 
mento degli sprite, potrà essere uggelto di 
"libidine " soprattutto per coloro che co- 
noscono il linguaggio macchina del 
C/64. 

Ciò non vuol dire che col Basic non si 
può fare nulla, tanto è vero che la tratta- 
zione che ci apprestiamo a fare sarà con- 
cretizzata mediante linee Basic perfetta- 
mente funzionanti. 

Dovremo, prima di procedere, distin- 
guere due tipi di collisioni: tra sprite di- 
versi e tra sprite e sfondo. 

Vi è un registro (Sprite to sprite colli- 
sion dctect register) locato in 53278 che 
registra le collisioni avvenute tra gli 
sprite. 

Gli otto bit di questo registro sono abbi- 
nati agli otto sprite secondo la solita rela- 


zione. Normalmente questi bit sono posti 
a zero; allorquando due sprite vengono a 
sovrapporsi, anche in parte, i bit associati 
vengono posti ad uno. 

Tentando di leggere ' questo registro, 
con (Istruzione PRINT PEEK (53278) o 
con altri sistemi* i bit posti ad uno si azze- 
reranno automatica- 

mente. 

Dall’analisi del valore decimale ricava- 
to dalla PBEK si otterrà un responso non 
univoco in quanto se, per esempio, due 
coppie di sprite si sono scontrate contem- 
poraneamente, si avranno quattro hit ac- 
cesi e non si potrà stabilire quali sottostati 
i contatti, 

A questo inconveniente si può ovviare 
andando a Leggere le posizioni dei vari 
sprite coinvolti e confrontandole tra di 
loro. 

Volendo sa pere, durante I elaborazione 
di un programma, se lo sprite Si e lo spri- 
te S2 si sono sovrapposti, si può utilizzare 
la tinca: 

SS=PEEK( 53278): 

1FSS = (2 | S17H42 ) S27THEN linea azio- 
ne 

La "linea azione” è quella particolare 
linea alla quale si vuole che il programma 
salti se i due aprite sono entrati in 
collisione. 

Questa linea (c le succisi ve) polrehhe 
contenere, per esempio, le istruzioni che 
simulano il rumore di un'esplosione, net 
casosi tratti di un vtdeogioeo nel quale un 
proiettile colpisca un bersaglio, c via 
dicendo. 

L'altro tipo di collisione* cioè quello tra 
sprite e sfondo, è rivelato dal registro di 
indirizzo 53279 (Sprite io background col- 
li si on detecl resister). 

Anche in questo registro gli otto bit so- 
no associati agli otto sprite; il funziona- 
mento è analogo a quello del registro pre- 
cedente Basta* infatti, che un determina- 
re) sprite si scontri, ad esempio, con un ca- 
rattere dello schermo per far accendere il 
relativo hit ali’inlerno del registro, 

11 rilevamento va effettuato con la se- 
guente linea: 

SB = PEEKf 53279): 

1FSB- 2 1 S THEN linea azione. 

Come si può notare, lo sprite S coinvol- 
to è uno solo: per individuare collisioni 
multiple bisogna utilizzare espressioni 
molto complesse c* pertanto, lente* è a 
questo punto che l'uso del linguaggio 
macchina diventa quasi obbligatorio, 
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1 REM PROGRAMMA D I MOSTRAI I UO 
e REM BY PASQUALE D’ ANDRETI 
3 REM RIARDO (CASERTA) 

S : 

10 PQKE 53200 , 0 : POKE 53201,0 
20 GOSUB 700 

30 HX-53240: HY-HX+1 :CX**HY+1 : CY 
-CX+1 : 55-53278 : SC-0 
40 FOR I-B36 TO 1022: READ A: PO 
KE I , A: NEXT 

50 POKE 2040, 14: POKE 204l,15:P 
OKE 53271,0: POKE 53277,0; PO 
KE 53276,0: POKE 53240,0 
55 POKE 53250,0: POKE 53264, 0:F 
OKE 53287, 2: POKE 53208,1:20 
KE 53269,3 
60 PRINT "CCLEAR3 ” 

80 XH-24: YH-50: POKE HX,XH:POKE 
HY, YH 

90 FOR U-0 TO 16 
100 AX-INTCRNDC . )*232 ) +23 : AY- 1 N 
TCRNDC , )* 179 )+51 
110 POKE CX, AX: POKE CY,AY:TIS-" 
000000 ” 

120 L-PEEKC197) : IF L-41 AND YH> 
54 THEN YH-YH-4 

130 IF L-44 AND YH<22B THEN YH- 
YH+4 

140 IF L-42 AND XH>28 THEN XH-X 
H-4 

150 IF L-50 AND XH<252 THEN XH- 
XH+4 

160 POKE HX , XH : POKE HY, YH 
180 IF PEEKtSS )-3 THEN 5C-SC+1 
165 PRINT” C HOME 3” SC 
190 IF T I > 200 THEN NEXT: GOTO 21 
0 

200 GOTO 120 

210 PRINT”CCLEAR3LGRIG1033 

HAI REALIZZATO ”SC” PONT 
I” 

220 PR I NT ” C 1 7 DQWN3UU0I GIOCARE 
ANCORA CS/N)?” 

230 POKE 53271, 3: POKE 53277,3 
240 POKE HX, 180: POKE HY.105 
250 POKE CX, 135: POKE CY.100 
260 FOR T-l TO 1000 


270 POKE 198 , 0 : DAI T 130,1: POKE 
53269,0: GET AS:IF AS-”S” TH 
EN RUN 

280 PRINfCCLEARO”: ENO 
700 PRINTCHRSC142) iCHRS(B) 

710 PRINT ,, CCLEAR3CGRIGI033 

IL GIOCO DELLA RINCORSA. 

il 

720 PRINT” E 3 D0WN3CERCA 01 RAGG 
I UNGERE IL SIMBOLO DELLA 
730 PR I NT “COMMODORE MENTRE SI S 
POSTA . 

740 PR I NT ’’ L DDWN3 PER MUOUERTI US 
A I TASTI: 

745 PRINT”tD0WN3 
SU' 

750 PRINT" C DOWN 3 
P 

760 PRINT” SINISTRA L ; 

DESTRA 
770 PRINT” 

700 PRINT" C DOWN 3 
GIU* 

790 PR I NT ” C DOWN 3 I L PUNTEGGIO SA 
RA’ U I SUAL I ZZATO IN ALTO 
000 PRINT "A SINISTRA. 

810 PRINT ”C 2 OOWN3CRUS3 PREMI U 
N TASTO PER INCOMINCIARE” 
820 POKE 1 98 , 0 : WA I T 198.1: RETUR 
N 

900 DATA 0,0,0,1,128,192,3,227, 
224 , 7 , 247 , 240, 7 , 255 , 240 ,7,2 
55 , 240 

910 DATA 3,255,224,3,285,224,1, 

255.192.1.255.192.0. 255.120 
S20 DATA 0,127,0,0,62,0,0,20,0, 

0 , 8 , 0 , 0,0 

330 DATA 0,0, 0,0, 0,0, 0,0, 0,0,0, 

0 , 0 , 0 , 0 , 0,0 

940 DATA 0,120,0,3,254,0,15,254 
,0,31, 254,0,63, 134,0,126,1 , 
254, 124,1 

950 DATA 252,120,1,246,240,1,24 
0 , 240 , 1 , 224 , 240 ,0,0, 248 ,1,2 
24,248, 1,16, 120 

960 DATA 1,8,124,1,4,126,1,254, 

63. 134.0. 31.254.0.15.254.0, 

3.254.0. 0.120.0 
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C 128 

Character editor 

per C/128 in 80 colonne 

Come ridefinire i caratteri in modo 
C/128 su video a 80 colonne 

dì (ì Mirrili Ciioili 



Il procedure video del t ommodore I2K, 
I M56.V può visualizzare una matinee ih ca- 
ratteri di 25 m ^ h c per HO colonne, utiliz- 
zando come memoria immagine una par- 
ie del hanui Diam a partire dal riruliriz- 
zo $20110. con un passo dt Ih li vie peT ca- 
rattere. ed un "interspazio di H byte 
inutilizzati. 

Ogni volta che "i accende il computer, il 
sei iti rara Iteri deve essere caricalo in 
Urani dalla Rum in cu t 1 1 Nel e memoriz- 
zato a partire dall indirizzo SI Mulo 

ti’ quindi particolarmente semplice 
mini Mica re uno o piu caratteri, essendo 
Nullìeiente modificare i corrispondenti 
byte Dram II programma F ha rader F- 
diior i, VI2K' scritto quasi interamente in 
Basic, vuole essere un esempio di come 
può venire al Inni lato il problema della 
definizione dei cara iteri sullo schermo ad 
SU colonne del C '| 2X Anche se tulio in 
teoria può apparire semplicissimo, m 
realtà hicngna fare i comi con le già la- 
mentale carenze hardware della mac- 
china, quali l impossibilita di accesso di- 
retto al banco Orarti 

Il programma utili/ za una zona Rum 
buffer, allocata all indinzzo SFlKNi, in 
banco IX come memoria di lavoro per i ca- 
ratteri ri definiti (Questa può venire Irasle- 
rila nella reale mappa caratteri in Di am, 
per controllare l'effetto che i nuovi curii i- 
teri provocano sui hi schermo ad HO co- 
lonne t io m rende indispensabile qualo- 
ra ni ridefmiscano caratteri speciali per 
giochi o programmi grufici, caratteri che 
renderebbero molto fastidioso futi lizzo 
di t ha rader editor, che lavora sullo 
schermo ad Ktl colonne 

1J progi amma fa largo uso di semplicis- 
sime routine in linguaggio macchina a 
partire dall indirizzo decimale 3633 è al- 
locata la routine che ricopia il set ride fino 
io dal bufi et nella reale zona di memoria 
cara liet e Dram 

Allindi rizzo decimale 3584 è allocata 
la routine che riempie la Ram buffer con i 


caratteri residenti su Rum: essa è usata 
per inizializzare il bulle r o per cancellare 
il set precedente meri le deli n ilo. 

All'indiri/zo 52664 è allocata la routine 
del sistema operativo che esegue fupdate 
( - modifica) di un registro del processore 
vide* k ed all'Indirizzo 526% quella che ne 
esegue la lettura In line, all indirizzo 
5274H. è allocata la routine che carica in 
Dram i caratteri memorizzati in Rum. 

Da notare le linee che eseguono rispet- 
ti vìi mente le operazioni di poke e peek sui 
byte Dram della memoria dedicata al 
processore video. 

L'uso del programma 

* Starti! p dato il comando Rim, il pro- 
cramma chiede se deve essere iniziali zza- 
to il boiler, ossia l'urea ih lavoro per i nuo- 
vi caratteri Rispondere V se m memo- 
ria non vi sono caratteri ride fin ili su cui si 
sta lavorando, altrimenti "N" 

•Menu il menu e composto da ^ opzioni 
di Lavoro, che possono essere selezionale 


usando i tasto Crsr in combinazione con i 
tasti Sii iti e Rei uni. 

• I I. dir char il carattere da modificare. o 
da creare ex novo, viene selezionato u- 
Niindo i tasti Cren il tasto Return convali- 
da la scelta, il tasto spazio consente il ri- 
torno al memi Scelto il carattere, questo 
viene visualizzato ingrandito sulla sim- 
slra: ì tasti t rsr muovono il cursore, lo 
Npazio inverie i pixel, t ir Home cancella 
il carattere, freccia in alto dritta d caratte- 
re in allo, mcnoH lo shillu a sinistra; con 
Return si esce. IVr convalidare il nuovo 
carattere premere "Y” oppure Return 

• 2 Change char set: cambia II set di carat- 
teri su cui lavorare da maiuscolo a imuu- 
scalo ri viceversa 

• 3 Save char set: salva su disco il buffer in 
cui sono memorizzati i nuovi caratteri I 
possibile Nili va re stilo il set maiuscolo n 
solo quello minuscolo, rispondendo “Y 
alla domanda: "Only Upper (o 1 owerj 
sei?" Se si desidera salvare lutti i caratteri, 
premere N " !) tasto Return fa tornare 
al menu 
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IL programma aggiunge automatica- 
mente al nome impostato il prefìsso 
"CHR-i ed il suffisso T. Pertanto un set 
di caratteri memori //alo impostando 
"PIPPO" sarà presente, stilla directory, 
con “CHR-fPIPPOf 

* 4 Load citar set: carica da disco un set di 
caratteri specificato indicando il nome 
del set (privo del suffisso c prefisso visti 
prima! 

* 5 Rotate char: consente di molare i ca- 
ratteri di 90 gradi in senso ora rio; la scelta 
del carattere avviene in modo analogo a 
quella del Top z ione "Ldit Chat'*, quindi il 
carattere viene visualizzato ingrandito: 
un tasto esegue la rotazione. Return esce. 
Per convalidare il carattere ruotato pre- 
mere “Y" oppure Return 

* 6 Char mirrar esegue il simmetrico dei 
caratteri rispetto all asse x oppure y; scel- 
to il carattere, "H" ne esegue il simmetrico 
rispetto all'asse y. “V" rispetto all asse x> 
Return esce, "Y” oppure Return convali- 
da no il carattere, 

* 7 Originai char set: copia in buffer i ca- 
ratteri contenuti su ftom. cancellando 
quelli evemualmenti ri definiti dalfuten- 
tc; alla domanda “Are you surc?” rispon- 


dere 'V se si desidera realmente ripristi- 
nare i caratteri originali 

* 8 Copy char block; copia un blocco di 
caratteri; è necessario scegliere il primo e 
fultimo carattere del blocco "origine", 
scegli' re se si desidera copiare il blocco al- 
rimemo dello stesso sci di caratteri, 
maiuscolo o minuscolo, ed infine sceglie- 
re il punto dì applicazione della copia. Il 
tasto spazio Lorna al menu. 

■ 9 Reverse char block; in verte i pixels di 
un blocco di caratteri; è necessario sce- 
gliere il primo e I ultimo carattere di tale 
blocco, con il tasto spazio si torna al 
menu, 

I lettori piu attenti avranno sicuramen- 
te notato che il blocco di Rum che viene 
utilizzalo come buffer, e che occupa 4 
khylc. è allocato all'Indirizzo 5EOOG. 
quando avrebbe potuto essere allocato al- 
I indirizzo SFOGO; ciò in quanto il pro- 
gramma è stato sviluppato con festens io- 
ne Basic "Craphic Espander C ■ 1 7K", che 
aggiunge, tra gli altri, i comandi hpoke cd 
tipeek che, consentendo la manipolazio- 
ne diretta da Basic del banco Drum, evita- 
no di dover ricorrere alle lente procedure 
di accesso alla memoria video e rendono 
molto più veloce il programma stesso. 


Come procurarsi Cha rader e- 

ditor C/128 

Sulto stesso supporlo magnetico che con- 
tiene il programma, viene inoltre fornito il 
programma “Ora pitie Editor C/128" che 
consente di aggiungere nuovi t potenti Co- 
mandi grafici per il Commodore 1 2K in mo- 
do HO colonne, 

I lettori interessati ad entrare in possesso 
del software in ottetto (fornito esclusiva- 
mente su disco} devono inviare la modica 
cifra di L. 27000, comprensiva delle spese di 
spedizione. Non ri è possìbile, infatti, invia- 
re materiale contrassegno. 

Compilate un normale modulo di C/C 
postale in diri zzando a: 

C/C postale N ,37952 207 
Systems Editoriale 
Viak Famagosta, 75 
20142 Milano 

Non dimenticale di indicare chiaramen- 
te, sul retro del modulo (nello spazio indi- 
cato con “1 ausale del versamento'*) non 
solo il vostro nominativo completo, ma an- 
che il nome del software desiderato: 

C-rapIric Espander C/128 (disco). 


1000 REM 

1010 REM CHAKACX ER EDITOR 126 BY GIORGIO CHI Q22I 

1020 REfl 
1030 : 

1040 REH CARICAMENTO ROUTINE LINGUAGGIO MACCHINA 

1050 FAST; FOR I *010123 : READA: FOXEl+3584 , A ; NEXT : FORI -0103: KEADCHC 1 J : NEXT 
1050 : 

1070 REM DEFINIZIONE LIMITE MEMORIA BASIC 
1080 P0KE4627,238:P0KE4ti26 l 255 
1050 : 

1100 REM DEFINIZIONE CARATTERI SPECIALI 

1110 tìS*CHRS<l7) :CS-CHK*C158) iBS-CKRSCb) : US-CHRS (28 3 : GS-CHKSC 30 ) : ES5-CHRSC 27 ì 
1120 GlS-CHRSC 158);S0S-CHRSC2) : LAS-CHRSt 153 : LS-CHRS ( 132 3 : HOS~CHKSU8) 

1130 UF*-CHR*(145):LG*-CHRSC 153) ; FOR I -1TO20 : WOS-UIDS + LS : NEXT 1:CH*-CHRS( 147) 

1140 WB*-CHRSC202)+WD*+CHR*C2033 : WD$-CHRS(2133+WDS+CHRS(201 ) : SlS-CHRSC 1573 
1150 RES-CHRSC28) ; RMS-CHRSC 18) ; ROS-CHHSt 146) : FORI - 1 1020 : BK*-BK$+CHRS( 32 3 :NEXTI 
1150 FQRI-lT019:MS-nS^LS;NEXTl ; FOR I -HO 14 : QCS-QC5+QS : NEXTI 
1170 U*-D*+CHRSC2133+nS+CHR*Cl773+CHRSC1923+CHR*C 1 77 ) + LEFTSC MS+flS , 32) 

1100 WS-tul+CHRSC 177 3 +CHRSC 182 3 +CHR®1 177 )+M5+CHRS( 201 > 

1130 FOR I -1T076 : WùfÉ-WldS+LS : NEXT I : WW**DS+CHRS< 202 3 +UWS+CHRSC 203 3 
1200 : 

1210 REM CODICE ROUTINE LINGUAGGIO MACCHINA 
1220 : 

1230 DATA168,0, 160 , 208 , 152 , 224 , 133 , 216 , 133 , 170 
1240 DATA 132,213,134*171 * 160,0,162, 14,168,0 
1250 DATA 141 , 0 , 255 v 168 ,218,32, 116, 255 , 162,63 
1 260 DAT A 1 42 * 0 , 255 , 1 45 , 1 70 , 200 , 20 8 , 234 , 230 , 1 ? 1 
1270 DATA230, 218, 165, 171,201,240, 144,224,86, 168 
1280 DATA0, 160,224,133,170,132, 171, 168,0,141 
1280 OAIA0 , 255 ,162,18, 168 , 32 , 32 , 204 , 205 , 232 
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1300 DATA 163 , 0 , 30,504,805, 1.60 .0, 160,63* 140 

1310 URI A0* 055, 177,170, 160,0,140,0*063,30 

1300 DATA505.00S, 150,41,7,73,7*040, 10,000 

1330 0010006,031,030,171, IBS, 171,001,040,144,003,36 

1340 DOTO 160 , 0 , 134 , 1 00 , 30 , 000 , 005 t 199 , 100 , 003 , 043 , 040 , 031 

1350 DAI A64, 30,96, 160: 1RAP31 10 

1 360 BRNK15 : FASI : S ¥550743 : SCNCLR 

1370 PRlNTTABt 16JCS'*- - - - - - - "BS^CHARACTEK EDITOR 10S”C$ h< - * 

1360 PR I NIX ABC 31 >USBS”BY GIORGIO CH JOZZ 1 " : TC-35: wr-tìl 

1330 PR I NTTABt 35 )0S>LA$SD$CS"f1ENU * : dW- 1005 : DT-60 ; OK-d0*7 : UN-1 : 1 1-7 

1400 Hi -10 : LO- 13 : 5 ¥-50684 : 5K-5V-0: DU-856: UT-056: RE "50636 : 5 1-6 ì RQ-95: dG-J373 

1410 PR INURBI 01 ÌCHKSt 140 ) tìSCHRSt 1 76 1CHRST 195 J CHK® t 174 ) ; 

1400 PRINTTABCS6)CHRS(176>CKRS( 130 ICKKSt 1 74 > 

1430 FQRI-1T09 : READASC I ) : PR I NITABC 01 1 BSCHRSt 001 5CHRSC 30)CHRSt051 ) ; 

1440 PR INTG*TABC30jAS( I ) IRH CS6 > BSCHRSC 001 )CMRSC 381CHRS C501 > 

1450 NEXTJ : K“1 : SE-0 : POR I *0TQ7 : UC ì )-0TI : NEXT : X I -0 

1450 PR I NTlUS : FQR I-1TO0 : PR INIBSOSCHRSC 001 JTABC 7B>CHRSt 001 J :NEXTI :PRiNTWW$; 

1470 GG5UB5900: GQ5UB3010 

1400 PRINTUFlUPSLiPSUPS: FRINÌ IABC 14 ILGSWOS 

1430 PRlNTTAtìCl4)CHRSC001>TABC43)CHRS(e0U : PR I NTTABC 14 )WBS 

1500 CHARi ,00, ltì, BS+"5£I FIAl USCOLO*’ : CHAR1 * 13 , 00 „ “T U15UALIZZA IL SET’* 

1510 URIA nOGIFICA CARATTERE , CAHB IR SET t 5AUJA SET , CARICA SET, RUOTA CARATTERE 
1500 DATA SPECCHIO, SET ORICI MALE .COPIA CARATTERI , INCERTE CARATTERI 
1530 CHARI ,03,00, LA*+ M INI ZI ALI ZZO? ■*+ESS+' fc U*’ 

1540 GEIXEYAS: ] FAS- ”5”THENSYS3504 : BOTO 1 560 
1550 1FASO THEN1S40 

1560 CHARI , 1 b , 00 * LAS+G1 1+ ”FRECCE-RETURN PER 5CE0LERE ”+E5$ + "0*‘ 

1570 IFKI-1THENSYS3533 

15B0 PRlNTHO*TAB(80)LEFTSCOC*,S+KlRE*RU*">*TABC3e>B»A»(K)TABt57 3RESRDS > '< ,J 

1590 GETKEYAS:PRINrHO*rABC00)L£FT*<QCS*5+X)“ "TABI 30 ì AS( K ) TABC57 ) M 

1600 I FAS-US1 HENK-X+ 1 +9* t X-B ) : 00101560 

1610 IFA«-UPSrHENK-K-l-3*<K-l ) : GOTO15B0 

1600 IFAS-'-^-THENKI-XOHCKl, l):5YS3b33-49llb*CÌ£l-0) 

1630 t FAS-CHR* C 13J IHENONXGUTO1G60 , 0350 , 0000 ,0300 ,0550, 0390 , 1670, 0660 ,0B70 

1640 BOTO 1580 
1650 : 

1660 REFI CANCELLAZ1UNE SET CARATI ERI RI DEFINITI 

1670 CHARI , 15,00, BKS: CHARI ,03,00, LA5+B5+ "SEI SICURO ?“+ESS+”0” 

1560 BETKEYAS: i FAS- rt S w THEN5YS3564 
1690 CHARI ,15, 00, 9KS i BOI DI 560 
1700 REFI 

1710 REFI EOI! CHAR 
1700 REFI 

1730 CHARI , 16,00, BS+LA*+ M HEIURN-SCEGL1E SP AZ t O-ESCE M + E SS + ” 0 ” 

1740 1FXI-1IHEN5YS3633 

1750 Ul-BB+ X *Y*DT ; FD-W : GO5UB3000 : BY- PORRO: BU5UB3050 ; BETXEYAS : B Y-K : GO5UB3050 
1760 IFAS-O$rHENX-X+i+30*{X~31} 

1770 1 F AS-S I STHENX-X - 1 - 30* C X-0 ) 

1 700 I F AS-UPSTHENY-Y - 1 - 9* C Y-0 ) 

1790 1FA*-U%THENY-Y+1+B*t Y-71 

1900 IFAS-” "THENCKAR1 , 15,05, BXS: RETURN 

1010 I FAS-* J T ”THENKI “XQRCKI , 11 : SYS 36 33-431 15* t K I -0 ) 

1000 IFASOCHRSt 13JGGTQ1750 
1030 CHARI , 15,05, BKS: RETURNi 
1040 : 

1950 REM NDOIF ICA/CREA CARATTERE 
1050 6OSUB1730; IFAS-" "THEN1560 

1070 CHARI , 15,50, BS+LAS+ "SPAZIO INOERTE, RETURN FATTO'* 

1900 CHARI ,00, l6,LGS+“t E * PER 5H I FT ARE “+BS+ESS+ '*0 ” 

1030 605005400 GOSUB 13401: CHARI , 15, 16, BXS: CHARI , 15 , 00 , BK* : CHARI ,06,00, "OKAY ?” 
1900 BEtKEYAS: CHARI , 15.55, BXS: LFAS-CHRSt 13)0RAS- '* Y “THENBEQ I N 
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1910 FQRI-0TO7: W-0: H1R1I-0TU7 ; P0-9W-1 I «-1*01 : GOSUB30B0 : W-UI+UC7- 1 1 1«(-1R-B1 ) ) :NEXT 
1920 POKEU+I ,U: NEXII : BENO 
1930 GGTUlBbH 
1940 CX-0:CY-0 

1950 iil-3333*CX+CY»60; PQ-W: GOSUB30B0: HY-K0R9S: 6USUB30bB:GEIKEYAS: B¥“R : GQ5UB30S0 
1960 IFAS-DSTHENCX-CX+l+B*(CX-7) 

1970 lFAs-SlSTHENCX“CX-l-9»(CX-0> 

I960 I FAS-UPSTHENCY-C Y- 1 -8*( CY-0 1 
1930 IFAS-BSTHENCY-CY+l+B«CCY-7) 

£000 IFAS-” "THEN2100 
£010 IFA5-"T"THENBEG1N 

£020 FORI-0TD7: PO-BW+I : GOSUB30B0: J-R: FORI I-1T07 : PO-BW+ 1 + 11*DT : GQSUB30B0 

£030 PO-BU+l+C I I-UN)»OT: BY-R: GOSUB30S0 ; NEXT: PO-BU+I+QK : BY“J : GO5UB3050: NEXT : BEND 

£040 IFAS-’VTHENBEGIN 

£050 FORI-0TO7: PG-BW+I *0T ; GOSUB30B0 : J-R:EUK1 I-1T07; PU-Blu+1 •0T+1I ; GOSUB30B0 
£060 POPO-UN: BY-R:GBSUB3050 ; NEXT: P0-8U* I*UT+TE ; BY-J ; GO5UB30S0 : NEXT ; BEND 
£070 iFftS-”3“THENGOSUB3010 
£060 IFA*<>CHRS( 13)G0TO1950 
£090 RETURN 

2100 PO-W-£04B: GOSUH30B0: BY*Bl+35*( R-Hl ì : GO5UB30S0 : 6QTD1S50 
2110 U 1 NUOtill 5 , ££ , 42 , ££ , 1 : PRI NTTAB ( 3 ) "NOME F ILE: " ; : L-0 : Ni-" " 

£1£0 PKINTCHRSt 17b35IS; : GETKEYAS: PRI NTCHKSC3215IS ; 

£130 IFAS-CHR*< 13)THENN*-*’CHR-C "+NS+" >”: RETURN 

£140 IFAS-CHRS(£0)ANDL>0THENL-L-1 : NS-LEFTStNS, LI ; PRINTAS; 

£150 I FAS> - " "ANDA$<-*V"ANDL<10ANOAS<>CHRSe34JAN0AI<> " . “TKENBEG1N 
£160 PRENTASj : NS=N$+AS: L-L + l ; BEND 
£170 GUTO£1£0 
£1B0 : 

2190 REM SAVE SET CARATTERI 
££00 G0SUB21 10; I FNS-*’ ”THEN££70 

££10 PR1NTCHSLASTABC41 “SOLO SET "MI DSC ''HAlf1IN“ , 1-3*CSE“1 > , 3) "USCOLG 7"; 

2220 GETKEYAS: I FA£< > ,, N , ’ANDAS< > "S" TKEN£££0 
££30 PRI NTCHST0BC9) "5AU1NG 

££40 fl-b7344-£04B-CSE-lANDA$-"S") : B-A+£04tì _ £04S*{ AS6— “N" 3 
2250 BSAVECNS) , U0, B0, P( AJTOPC B1 
££60 PRINTCH5LAS IAB(£1DS$ ; 

££70 GE1KEYAS>: PKINTCHSL5SHUSH0S : 6D1 U1S60 

2£B0 : 

££S0 KEfl LO AB SET CARATTERI 
£300 GOSUS2110; 1FNS" ,,,, THEN££70 
2310 PRINTCHSTAH191 "L0AD1NG . . . " ; 

£3£0 BLGADCNS1 , U0 , B0 : GOTU22S0 

£330 : 

2340 REM SUITCH SET MAIUSCOLO-MINUSCOLO 

£350 SE“XOR<SE ,11: CHAR1 ,22,19, BS+ "SET "+niOSt “MAIMIN" , l-*-3*SE , 31«-"USCOLO" 

£360 GO5UBESB0 : GOTO1S60 
£370 : 

5380 REM CREAZIONE DEL SIMMETRICO DI UN CARATTERE 
£390 6USUB1730; IFAS-” "TKEN1560 

£400 GOSUB£4B0:CHAR1 , 17, ££ . LA»+"PRIZONTALE 0 UERT ICALE7 "+ESS+ "0” 

£410 CHAR1 , 15, 16, LAB+CS+ "PREMI ’O ‘ 0 'V\ RETURN ESCE-tESS+'-O" 

£450 GETKEYAS: IFAS-CHRSC 131THENCHAR1 , 15, 22, BKS: CMAR1 , 15, 16 , BKS : BOTO2390 
£430 1FASO , *0”ANDAS<> '*U"IHEN£4£0 

2440 CHAH1 , 15, ££, BKS; CHAR1 ,20,25, LA*+“STO LAVORANDO . . . “ + E5S+”Q" 

2450 BANK0 : FORI -0107 :A< 1 1-PEEKC U+ 13 : NEXT : BANK1S 
£460 IFAS-”O"THEN£510 

£470 FOR I -0T07 : PQKEU+ I , AC7- I > : NEXT : GOTOB400 

£490 U-57344-KX+Y*3El*tì+£04B*SE; FURI -UT0U+7 : BANK0:H“PEEK( I ) 

2490 FORI I-0TO7 : PO-BU+C I-U)*QT+ 1 1 ! BY-WT+C TC*C CHANDCUC TE- III > 1-ZE 1 1 
£500 BANK15: BOSUB3050: NEXII 1 , 1 : RETURN 

2510 FGRI-0TU7: D-0: FORI 1-0TD7: 0-0- CU( II))»CCA( 11AN0CUC7-I1 J ) J>0) : NEXTI I 
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£5£0 PUKEU+ 1 , U: NEXT l ; GDTU£400 
£530 : 

£b40 REFI RUOTA UN CARAITEKE 
£550 GO3UB1730: IFAS-" "IHEN 1 bb0 

£560 GO5UB£4B0: CHARI , lb, ££, LAS+ "UN TASTO RUU I Pi RETURN ESCE ' +ES$ + “U " 

£570 GETKEYRS: [ FAS-CHRStl 3 ITHENCKAKI , Ib,£tf , BKS : GDTQ8550 
£560 CHARI , lb,££, BKS:CHARl,£W,££, LAS+"STU LAUDANDO . * * "-«-L5S + "LT 
ebbe HANK0 : FQRI-0TQ7: AC 1 ) *PEEK t U+ 1 > : NEXT : BANKIS 
£600 FORI -01 07: Pt I )-0 : FOR l I -0TO7 

eeie Pt n-pc n-ut 11 j*ccacii janlju<7- i ) >> 01 ìNext i i . i 
£6£0 FOR1-0TO7: POXEÙ+1 , PC 1 ) :NEXI :GOlU£5b0 
£630 chari , ib, ìb.axs Lburoibbw 

£b4W : 

£650 REM COPIA BLOCCO CARA! IERI 

£660 CHARI ,16.16* BS + " RE TUKN SCEGLIE, SPAZIO ESCE" 

£670 CHARI, lb,££\L AS+ "SCEGLI IL PKIttU CARATTERE "+E5S+"D" 

£600 GU5UB1750: IFAS-” "THEN£630 
£b90 A-b7344+(X+Y*3£}*B+£04tì»SE 

£700 CHARI t £l ,££,LAS+ "SCEGLI L* ULT I HO " + ESS+ "0 " : 6OSUB17b0: I FA$-" “THEN£63tó 
£710 tì-57344+CX+Y*J£)*B+£0He*5E 

£7£0 CHARI , 17 ,££, LAS+"COPlA SULLO S1ES5U SEI 7 M +ES*+"U" 

£730 GEIKEYA»; I F A* < > "3 "ANDA«< > h, N " T HEN£730 
£740 I b AS- "N^THENBEG I N 

£?bW SE— XORC SE , 1 ) : CHARI „ ££ , 1B,BS+"9ET "+FI1D*( "HA in I N ", 1 +3*SE , 3 ) + "USCOLO ” 

£760 GO5UB£3tì0; BENU 

£770 CHARI , Ih, ££, LAÌ+ "SCEGLI LA POSIZIONE DI COP i A " +ESS+ *'□ “ 

£780 GO5UH1750: IFAS-" "rHEN£630 
£730 C-57344+t,X*Y*3£>"tì+£040"SE 

£000 CHARI , 1 b , ££ „ BKS ; I FB< ADKt B-A J > b l 440 -C+£®40* C 5E-0 10R CO AANDC< B )THEN£630 
£810 CHARI # £1 , ££ , LAS+ "STO COPIANDO . , . “+ESS+ "0 ” 

£8£0 BANK0 1 PURI “AIOH + 7 : PUKEC+ I -A, PEEKt I ) ; NEXT: BANK 15 : CHARI , 15 , ££ , BK$ 

£830 H-Kl-lTHENSYSJbJJ 
£040 GOIO£660 
£0S0 : 

£060 REFI INCERTE BLOCCO CARATTERI 

£070 CHARI , 15. Ib.BS+’REIURN SCEGLIE, SPAZIO ESCE" 

£0tì0 GUARI, 16 ,££> LAS ♦"SCEGLI IL PKI HO CARA 1 1 ERE " + E5&+*'U" 

£030 GOSUB1750: 1 FAS-" "rHEN£630 
£300 A-S7344+I X +Y * 3£ ) *B+£04d*SE 

£310 CHARI , £1 T ££ , LAS+ "SCEGLI L 1 UL T J HO "+tb*+ "0 " : GU5UB1 750 r 1 E Alt* " "THtNBbJW 
£3£0 B-5 7 J44 + tX + Y“3£ J *tì*£04H*5E 

£930 CHARI , 15 É ££, BkS: 1 FB< Al HEN£630 

£940 CHARI ,£ì ,££, LA*+"SIU LAVORANDO * . . " ♦ESS+ J1 0 ,J 

£9b0 BANKW: PORI I-ATOB+7: POKEI ,£5b-PEfckU > : NEXT; BANX15 

£960 CHARI , lb , ££ , BKS; 1 FKl -1 THENS YS3633 

£970 GOTO£H70 

£960 CHARI ,45, 16.CHRSC 1 4£- 1£B*SE ì +RE* 

£930 FORI *0101 : FORI I *0103 ; PN 1 NTTABC 4b JCHRS C 146- 1£B* l 3 ; ;FDRCH*CHt I I )TOCH( 1 I ) + 3l 
3000 PR I NICHRSCLH 1 ; : NEXT: PRIMI : NEXT : NEXT : PR1NTCHKSC 14£) i : RETURN 
3010 CHARI ,5, Ib.CHKSt 14£ ) + CS : FQR l -0TO7 : PR I NTTAB C 5 3 ; 

30£0 KORCH-0TO7 : PRIMI “ . ; NEXÌ : PR I NT : NEXT : RETURN 
3030 : 

3040 REFI HPOKE PO.BY 

3050 SYSSY . POANDDD p LO;SYSSY , INT tPO/DT > , HI ; SYSSX . BY : RETURN 
3060 : 

3070 REFI R*HPEEXtPO) 

3000 SV55Y , 1NTCP0/0TJ ,Hl ; SYSSY f POANOOD , LO : SYSRE : H-PELKC S I 1 : RETURN 
3060 : 

3100 REFI ERROR TRAPPING 

3110 PRlNrE5SH0SHUSCHS: PR1NT “ERRORE : M ERRSC ER ): PR 1 NT “STAIO DISCO : H OSS 
31 £0 FORI -0T 03000 NEXT; RESTÙRE 15 10 : RESUFIE 1360 
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ALTA RISOLUZIONE A BASSO COSTO 

LA MIGLIORE PERIFERICA PER GRAFICA 


Software compreso su cassetta e disco 



LA PRIMA TAVOLETTA GRAFICA A BASSO 
CHE OFFRE 

LE PRESTAZIONI E DURABILITÀ RICHIESTE 
APPLICAZIONI 

INDUSTRIALI, AZIENDALI, SCOLASTICHE ECC. 
E' PICCOLA, PRECISA E AFFIDABILE. 


GRAFPAD II 

• DIMENSIONE DISEGNO: FORMATO A4 

• ALTA RISOLUZIONE A COLORI 

• PER CASA E UFFICIO 

• DIVERSI PROGRAMMI OPTIONAL 

• DISEGNO A MANO UBERA 

• DISEGNO CIRCUITI ELETTRICI 

• CREAZIONE DI BIBLIOTECA SIMBOLI GRAFICI 

costo per AMSTRAD 464-664- 

DALLE 6128 

PER COMMODORE 64-128- 
128D 


NON HA BISOGNO DI MANUTENZIONE 


NOVITÀ' ASSOLUTA PER ' I 

RICONOSC1TORÈ VOCALE: comanda a voce il tuo Commodore 64 tramite microfono 


NOVITÀ' ASSOLUTA IN ITALIA 

Televisore TASCABILE: seguite le trasmissioni televisive in qualsiasi luogo. Dimensioni: 13 cm x 7 cm x 3 cm, 


AMSTRAD 464-6654-6128 


H 

A 

R 

D 


Penna ottica 

Espansione di memoria 64 K - 266 K 
Sintetizzatore vocale 
D»sc Drive con controller 
Stampante DMP2000 

TASWORD: WP potente per creazione di testi e documenti 
TASPRINT: Programma supplementare al precedente per la stampa 

TASCGPY; Hard copy -stampa immagini anche in formato poster di tutto ciò che compare su video 
MAST ERRILE: Sistema di archiviazione e ricerca selettiva - potente DATABASE 
MUSIC -SYSTEM: Per comporre musica 



AMSTRAD PCW 8256 -8512 

Espansione di memoria 256KB ■ secondo disco da t Megabyte in kit di montaggio 

GRAFPAD III: tavoletta grafica ad alta risoluzione per CAD professionale completa di software e mancai in 

italiano 

TASWORD 8000: elaborazione testi con abbinamento testi a indirizzi, stampa etichette, stampa in protocollo 


TASPRINT 8000: Programma compie mentore ai precedente per stampa professionale con 6 stili diversi 
CYRUS II: scacchi tridimensionali professionali 


CONSEGNA IN TUTTA ITALJAi TELEFONARE PER INFORMAZIONI 
S*T. Sytcom - Vie B, Palano, 1 3/ft * 74100 targamo - Tal. 03 5/2397 51 


GIOCHI 

C 64 


Simulatore 
del videogame 

“Frogger” 

Un breve gioco, basato sulla tecnica 
dell’interrupt, che ricorda le imprese del 

povero ranocchio . 


di Maurizio Odi* Abate 


Per chi vuoi solo giocare... 

C 

optate atte manierile il listata, prestando 
particolare attenzione alle ultime righe di 
DATA, quindi salvate if programma (a scopo 
cautelativo) su disco o nastro PRIVI A di dare 
il Kun, 

1 o scoprì del gioco è mollo semplice: attra- 
versare una strada percorsa da ben otto auto 
da Formula l che sfrecciano in mite le direzio- 
ni a diserse \eltx’ilà; inutile dire che è neces- 
sario evitarle, al fine di non venire arrotati 
con conseguente perdita di una delle cinque 
vite a disposizione. 

Per muovere l'omino (stavolta non £ un 
ranocchio ,1 si utilizza il joystick in porla 1 
oppure la tastiera: premendo il pulsarne di 
fuoco si avanza dì un passo, meni re muoven- 
do a sinistra o a destra si provoca lo sposta- 
mento nelle corrispondenti direzioni 5i noti 
che, come ogni buon pedone dovrebbe sape- 
re, non è possibile tornare indietro una volta 
entrati nella mischia dei bolidi. 

Se non possedete un py stick potute utili/’ 
/.are i tasti corrispondenti, ovvero CTRL e 
tasto "2'‘ per spostamenti laterali e la barra 
(spazio)* che simula il Firc Rutton 

Nell'angolo in alto a destra dello schermo si 
trovano tre indicatori di cui descriviamo le 
funzioni 

V VELOCITA*: indica la velocità media 
delle FI che, col passare del tempo, aumenta 
costantemente e rapidamente; all "inizio della 
partita la velocità è uguale a 100 km fi i leggi: 
lumache), ma aumenta firn» ad un massimo di 
452 k m % (leggi ve riesci a passare sarai famo- 
sa ‘ Commodore Computer Club 


so) Ovviamente non si deve perdere tempo e 
il perchè dovreste capirlo da soli... 

0 ■ OMINI: è il numero delle vite di riserva. 
(5 albi partenza); si può perdere la vita in due 
modi; investiti da una Fi oppure cercando di 
recarsi olire i limiti laterali dello schermo. 

P PUNTEGGIO: i punti aumentano di tre 
unità ad ogni passo in avanti; con l'attraversa- 
mertlo della strada si ottengono ben 5(1 punti 
di bonus. 

.„e per chi vuole imparare a 
programmare 

tl gioco, come già accennato, è imperniato 
sulla programmazione dell'mterrupt. Sui fa- 
scicoli arretrati (e futuri) di C.C.C, troverete 
dettagli su questo argomento, di cui diamo 
comunque una semplicissima descrizione. 

L’tntemipt 

[ inierrupt (interruzione) è un segnale 
elettronico che obbliga il microprocessore a 
sospendere tutto ciò che sta facendo e ad ese- 
guire un programma in linguaggio macchina: 
al termine di questo programma è presente 

1 istruzione RI I ( KcTum frolli Inierrupt) che 
riporta il miao a continuare il lavoro che 
avevi interrotto, come se niente fosse 
accaduto. 

l e fonti che possano generare uninierru- 
ziune sono molteplici; !a piu importante è 
quella del TIMER A del CIA (uno dei due 



chip di 1 f) del C-64'12®). Il CIA interrompe 
iì mirro ogni bOmo di secondo t lo obbliga a 
saltare a IT in di rizzo puntato dal vettore conte- 
nuto nelle Locazioni 788 - 78^ (Jttì 14 ■ SU3 155 
che, all 'accensione del calcolatore, corrispon- 
de a 59953 (SEA31). Qui risiedono le routine 
d interrupt del Kcmal fi) sistema operativo! 
che assolvono funzioni indispensabili, per il 
corretto funzionamento del computer tra cui 
la scansione delia tastiera, L’incrc mento degli 
orologi, il lampeggio del cursore ed altre. 

Modificando opportu narri ente il vettore 
d interrupt. cioè sellandolo per puntare ad 
una routine in RAM scrina dall 'utente, si ptv* 
sono creare interessami effetti di esecuzione 
pscud impara) le la , come ad esempio la genera- 
zione di una musica menile stiamo 
programmando, 

La nostra routine dovrà terminare con un 
IMP SEA31, in modo che venga eseguita an- 
che la normale procedura d 'interruzione. 

Nel casti del gioco proposto, abbiamo rea- 
lizzato una routine m L.M. assai breve che ha 
il compito di incrementare u deerementare la 
coordinata X degli otto sprite (le Formula 1). 
Osservando attentamente il disassemblato, 
dovreste capire tutto quanto sopra esposto ed 
il metodo che si t utilizzalo per differenziale 
la velocità delle macchine. 

Un'ultima nota: la locazione del OA 56325 
(SDOJ5) coni iene la frequenza di invio del- 
l'interruzione (in realtà non è proprio cosi, 
ma fa lo stesso); più il suo contenuto è basso, 
maggiore sarà la frequenza Intervenendo su 
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!>6325 si è potuta regolare hi velocità globale 
delle autovetture. Provate a digitare in rnodu 
diretto: 

POKE56325,2l) 

It cursore lampcggerà piu velocemente; hi 
causa non ve la diciamo perchè ormai siete* o 


almeno dovreste essere, in grado di scoprirla 
da soli. 

Il disassemblato 

Ecco, di seguito* il di&assemblau* delta nou 
line in linguaggio macchina posta neirintef- 


rupi. Il contenuto della locazione |A2 dA2) 
viene incrementato dal Kemal ogni volta che 
si verifica un intemizicme. La routine effettua 
un AND fra il contenuto di SA2 ed 1 furto), 
quindi, per mezzo di un BNE. fa in modo che 
le coordinale di due spntc vengano modifiea- 
te OGNI DUE interruzioni { dando luogo. rii 
conseguenza, ari uno spostamenti 1 ) più lento). 


03A7 

CE 

00 

00 

□ EC 

SD000 

muove 

sprite 

0 

a 

sinistra di un dot 

0£AA 

LE 

0c£ 

D0 

INC 

so ma 

muove 

sor ite 

1 

a 

destra di un dot* . . 

0BAU 

EE 

0B 

00 

INC 

muma 

, 4 * 0 

di un altro 

dot * diu j veloce 


LE 

04 

00 

INC 

mióm 

muove 

spelte 

d 

a 

aestra ai un aot 

®au3 

CE 

09 

00 

DEC 

SO00tì 

muova 

aprite 


a 

sinistra di un aot 

\da\ib 

Eh 

0C 

00 

INC 

SU00L 

muove 

spnte 

b 

a 

destra ai un aot 

0EBS 

CE 

0£ 

00 

UEC 

SL/00E 

muove 

spnte 

7 

a 

sinistra di un dot, , . 

05BC 

CE 

0E 

00 

UEC 

3>U00L 

w m È e 

di un altro 

dot l piu 1 veloce) 

0EBF 

Ab 

Ad 


LLJA 

$Ad 

accumulatore 

- 

Pt£K(SA3 J 

0£C1 

db 

01 


ANO 

»a>wi 

accumulatore 

- 

accumulatore bnu 1 

03C3 

00 

0b 


BNE 

aìtìectì 

se accum . <> 

0 

continua interrupt 

0ECS 

EE 

0b 

00 

INC 

$D00h 

muove 

sprite 

d 

a 

destra ai un aot 

0ECB 

CE 

0A 

LI0 

DEC 

SD 00 A 

muove 

spnte 

b 

a 

sinistra di un dot 

0BCB 

4C 

Jl 

EA 

jhp 

SEA51 

continua il 

programma a'interrupt l 



100 RETI MINI - FRGGGER 

110 REM SOLO PER C/64/ 138 3B0 

130 : 

130 REM BY M. DELL * ABATE 390 

140 : 

150 X1$**CHR3>( 17) +CHRS C 157 ) +CHR3> 300 

C1573+CHRS<157>: X3S-X1S+CHR 
SC 157)+CHRSC157) 310 

170 SYS65409 : REfl RESET DEL UID 330 

EO 330 

180 FUK A-B33 TO 838+63 ; READ B: 340 

POSE A , B: NEXT 

190 FQR A-B96 IO 896+63: READ B: 350 

POSE A, B: NEXT 

300 FOR A-679 TD 717: READ B : PUK 360 

E A , H : NEX T 370 

310 0-53348 

330 FOR A-0 TO 7 : NORWD C i ) 

330 1F NC< .5 THEN PDKE U+39+A , 1 3B0 

: GOTO 360 

340 IF NC< . 7 1HEN POKE 0+39+A.7 

: GOTO 360 330 

390 POKE 0+39+A , 0 

360 NEXT 400 

370 PN-8040: POKE PN, 14: POKE PN+ 410 

1,13: POKE PN+3 , 13 : POKE FN+3 430 


, 13: POKE HN+4, 14 

POKE PN+5 , 14 : POKE PN+b,13:P 

□KE PN+7, 14 

REM TT PUNTATORI E COLORI 
SPRITES 

S-54373:F0R A-0 TQ 34 : POKE 
3+A,0;NEXT 

POKE S+34 , 15 : POKE S+6,340 
POKE S, 35: POKE S+1,35 
GOTO 3S0 

POKE S+4 , 17: FOR TE-0 TO 30: 
NEXT: POKE S+4 , 16: RETURN 
GQSUB 340: POKE 53381, 18: POK 
E 53380, 15: PR1NT: POKE 646,7 
PRIMI “ IL PEDONE ..." 

PRINT: PRINT • POKE 646,0: PRIN 
T” GAME PER C-64 BY fi. DELL 
'ABATE’* 

POKE 646, 1 : PRINT: PRINI : PRIN 
T: PRINT: PRINT : PRINT” PREMI 
UN TASTO PER GIOCARE" 

POKE 199 , 0: UIAI T 198,1: POKE 
198 , 0 : GOSUB 340 
PR I NTCHRS (1471 : IC-70 
FOR A-0 TQ 14 5TEF 3 
POKE O+A, 356*RND( I ) 
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430 

440 

450 

460 

470 

480 

490 

500 

S10 

550 

530 


540 

550 

560 

570 

580 

590 

600 

610 

680 

630 

640 

650 

660 

670 

680 

690 

700 

710 


760 

730 


740 

750 

760 

770 


PGKE U+A+l , IC: IC-IOIS: NEXT 
POKE 56334, PE EX C 56334 J AND 
654 

POKE 788 , 167 ; POKE 789,6 

POKE 56334, PEEKC 56334) OR 1 

POKE 0+61 , 655: POKE 646,0 

Ul-5: PO-90: PT-0 

POKE 1096 , 26 : POKE 1136, 15: P 

DKE 1176,16 

X-14: Y*-61 

CG-FEEKCU+31) ; GOTO 610 
POKE 56365, PO 

POKE 611, 33: POKE 614,1:SYS5 
8640: PR1NT INI C9000/PO) ; X6S ; 
UI ; X1S ; PT 

SS-6G : EF-PEEKC56361 ) 

IF PEEKCU+31) THEN 630 
IF P0> 60 THEN PO-PD-.l 
IF EF-539 THEN Y-Y-l : PT-PT+ 
3: GOTO 610 

IF EF-651 THEN X-X-l : GOTO 6 
10 

IF EF-247 THEN X-X+l : GOTO 6 
10 

GOTO 560 
GG-1054+X+40*Y 
POKE GG, 81: POKE S+GG.l 
POKE SS, 36 

IF X<1 OR X> 68 THEN 650 
IF Y-l THEN 670 
GOTO 540 

FOR A-0 TO 9 : GOSUB 340: NEXT 
PT-PT+50: POKE GG , 36 : GOTO 50 
0 

POKE 56334, PEEKCS6334) AND 
554 

FOR A-l TO 10: GOSUB 340 
FOR B-5 TO 3: POKE 53565, CPE 
EKC 53565) AND 5483 OR B: NEX 
T: NEXT: POKE GG.35 
POKE 56334, PEEKt 56334 3 OR 1 
0I-UI-1:IF UI-0 THEN PRINT” 
IBI ANC0 1 1 H0I1E 3 L DGUIN 3 GAflE 0 
UER": POKE 11 38,48: FOR B-0 T 
O 3000: NEXT; RUN 
GOTO 500 


DATA 0,0, 0,0, 0,0, 0,0, 0,0,0 


,0,3,195,0,3,195 
790 DATA 56,57,563,56,67,553,1 
84,55,183, 540 , 31 , 536 , 555 . 57 
, 539 , 63 , 31 

790 DATA 538,555,55,163,640,57 
,583, 1B4, 67, 553,56, 3, 195,56 
,3,195,0 

800 DATA 0,0, 0,0, 0, 0, 0, 0,0, 0, 0 

, 0 , 0 , 0 , 0 , 0,0 

810 DATA 0,0,0,0,0,0,0,0,3,195 
,58,3, 195,58,851 ,516,68 
050 DATA 551 ,616, 15,537, 155,63 
,119,646,555,547,516,63, 119 
,548, 15,637,155 

830 DATA 59,551 , 516, 58, 551 ,516 
,58,3, 195,0,3,195,0.0,0,0,0 
840 DATA 0,0, 0,0, 0,0,0 
850 : 

860 ; 

B70 DATA 506, 0, 80B, 538, 5, 608, 53 

8 

880 DATA 5,506,538,4,508,506,8 
890 DATA 508,538, 15, 508, 506, 14, 
508 

900 DATA 506,14,508,165,165,41, 
1 

910 DATA 508,6, 538, 6, 608, 506, 10 
950 DATA 508,76,49,534 
930 : 

940 REM DI n, DELL'ABATE CO 


* tttf* * 
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HARD BASIC 

QUALSIASI COMPUTER 


Un’occhiata 
all’esecutore 
ed una all’editore 


Studiando 

attentamente 
l’interprete Basic 
vengon fuori 
autentiche sorprese... 



L parola riservale del Basic si di- 
siinguono in due categorie: 

* quelle che possono essere poste ai- 
ri nizio di una Jiuea Basic, o subito 
dopo i "due pumi" (come Leu Data, 
tf, ed altre). 

• quelle che, se poste in tale posizio- 
ne, provocano un “SYNTAX ER- 
RO R" (TAN. I.EFT1 AND, STEP). 

Alle parole della prima categoria si 
suole dare d nome di "Comandi" 4 . 

In fase di editing, cioè quando digi- 
tiamo una linea di programma o una 
frase da eseguire immediatamente, ci- 
gni parola chiave viene TOKENIZ- 
ZATA, cioè sostituita col suo numero 
di "codice" (detto appunto TOKEN); 
la tabella del riquadro I riporta pero- 
gni parola chiave il tolte» corrispon- 
dente. 


di t la udio Baiocchi 


Prime difficoltà 

Come si può notare dalla tabella 
stessa, il Basic 2 0 (quello del Vie 20 e 
del 064). pur essendo più povero, e 
molto più 'ordinato" delle versioni 
successive: in effetti, indipendente- 
mente da ciò che avviene in fase di li- 
sti ng, nel Basic 2.0 la tabella contiene 
prima tuoi i comandi (tolte n da 128 a 
162), poi le altre parole chiave (token 
da 16.1 a 2021. 

Uniche eccezioni sono il token 203 
(codice di GOl ed il 255, token di 
pi greco. 

Nel Basic 3.5 (quello di C/16 e 
Pìits/4) e nel Baste 7,0. (quello del 
C/128), i comandi vanno invece da 
1 28 a 162. poi da 21 3 a 250. Il 202 (to- 
ken di M1D$) può anche essere un 


comando (?). ciò si ripercuote natu- 
ralmente in una minore velocità di e- 
la ho razione, ma d'altronde Tal terna- 
ti va era distruggere ogni forma di 
compatibilità. 


Come ragiona l'interprete 

Il Basic Commodore ha due tipi di 

separatori": il 58 (token dei "due 
punti”, che separa più istruzioni po- 
ste sulla stessa lineale lo 0 (token di 
line linea) Non ce pericolo di confu- 
sione con la cifra zero (11), toke ni z/ Li- 
ra con 48, suo codice ASCII. 

Seguia ino passo passo il lavoro che 
l'interprete svolge per eseguire il sin- 
golo statement, cioè luì blocco di i- 
si razioni compreso tra due separato- 
ri (la routine in questione è spesso 
detta NSEi, Nexi Statement 1 xecu- 
tor|. 1 1 riferiamo, per ora. al Vìe 20 e 
a! C/64: torneremo piu in là su qual- 
che variante relativa ai modelli suc- 
cessivi. 

Si tenga presente che i singoli token 
da eseguire vengono letti tramite ciò 
che in Basic potrebbe essere descritto 
da: 

I PE EK( 1 22)+ 256* PI: EK( 1 23 ): 

T= PEEKl’l) 

Il è l'Indirizzo della cella contenen- 
te il token da eseguire; T è il valore di 
tale Token}: supponendo che 1 sia il 
token di un separatore (è a tuie punto 
che va spezzato il ciclo per una sua 
corretta descrizione) le fasi della rou- 
tine NSF si svolgono nel seguente 
modo : 

(I) se FEEK(123))2 si esegue un'o- 
perazione che in Basic potrebbe esse- 
re descrìtta con; 

POKE6LPEEK(122) 

POKE62. PEEK{ 1 23) 
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Token e parole chiave corrispondenti 


Su tutti i modelli, tra i codici infe- 
riori a 128, solo loO (= fine linea) e iì 
58 ( doppio putito) rappresentano 
delle istruzioni; ci limitiamo perciò 
ai token da 12$ a 255, 

Il simbolo “C" significa “Coma- 
ndo". La colonna ' Versioni Basic' 
indica la versione in cui c presente la 
parola stessa; V2.0 { Vie 211 e C/64); 3,5 
(C/16 e Plus/4) e 7 (C7128). La 
colonna “Solo List” fa riferimento al 
Basic 2.0 { Vie 20 e Plus/4) c fornisce 
l effetto del token in questione in 
sede di LIST; in sede di esecuzione 
tale token genera errore. 


# Parola 

11H KNtl 
129 FOR 
i .MI NF-XT 

131 DATA 

132 INPUT# 
131 INPUT 

iw dim 

M READ 
I 36 LfcT 
ut «erro 
131 R.UN 
IW If 

i 40 rl s i or r; 
M) GOSUB 
142 RFTURN 
IO REM 

144 STOP 

145 <>N 

146 WAfT 
14T I DM) 

Ì4I SÀVF 
149 VPRIFV 

PEF 

15] KMUE 
152 PRINT* 
IVI TRI NT 

1 54 CONT 

1 55 LIST 
3 56 età 
357 l'MI> 

15* SYS 

1 54 OPEN 

160 CLOSf 

161 OF-T 
362 NEW 
163 TAB< 

364 TO 
165 FN 
1G6 5PC1 
167 THE N 
16i NOT 
\m STTP 

m + 

È7I ' 

i n m 

173 / 

174 * 

175 ANO 

176 OR 

177) 

ira - 

179< 

IH} SGN 

181 INI 
m A SS 

m us r 

I M FRE 
IMS POS 

m sor 

||7 AND 
m LOG 
IWEXp 
ITOLO* 

191 SIN 

192 TAN 

193 ATN 
m PEEK 
195 LhN 
|4h STO 
IV7 VAI. 

14» ASC 
199 t H Ai 
SUO LEKl'l 
m ftiOHtl 


Versione 

Basic 

c rune 
CTterte 
C Tulle 
CTtetw 
Clune 
C lune 
C TUtte 
C Time 
C Tinte 
C Tutte 
C TUlte 
C Tutte 
C Tutte 
C Tutte 
C Tutte 
C Tutte 
C Tutte 
C Tutte 
C Tutte 
C Tutte 
C TV eie 
^ TU ite 
C Tette 
C Tutte 
C fune 
C Tunr 
C Tuli* 

C Tutte 
C Turte 
t_ Tutte 
C Turpe 
C tutte 
t lune 
C tutte 
C rune 
Tutte 
Tutte 
TUtte 
Tutte 
TUtte 
Tlitie 
lune 
Tutte 
Tutte 
Tutte 
Tutte 
lune 
Tutte 
Tutte 
Tutte 
lune 
Tutte 
Tutte 
Tutte 
Tutte 
Tutte 
'nilte 
Tbtte 
tUtle 
TUtte 

tutte 

Tutte 

tu™ 

TUtte 

Tutte 

tutte 

Tutte 

Tvne 

Itene 

Tutte 

Itene 

TUtte 

TUtte 

TUtte 


tu. 1 Metti 

3J «I 
»* RCR 
2 IH Rt E.K 
30* RLlrM 
207 K>Y 
201 A DO! 

Jt» DEC 
71 11 H E.XS 
3i i t inti 
713 INSTA 
31 ] t LM- 

214 RIMIMI 

215 TAAP 

216 THON 
J|7 m(lH 
il» bOl 'NO 

m vot- 
ati ALTO 
321 PUDEF 
2 U t,1AFHK 
1 21 PAINI 
SA < MAH 

za pnx 
li* Lift LI 
33Ì listi AKt 
za SSMAPI 
m draw 

130 LOCATE 
2 ti < mi ut 

ma * i fi 

233 5t Al-F 

LM HELP 

m DO 

2.16 U K>P 

217 EXTI 


Tutte 
C lune 

1-5/1 

3-VT 

15 

JJ/J 

isn 

157) 

J.SiT 

15/7 

i sn 

t 1 5/1 
C 1 S/T 
C * 5-1 
C 15/T 
C 15/T 
C 1 5/7 
C 33/1 
t 15/1 
C ) V7 
C 15/7 
t 1VT 

C 3 5/7 

C 13/1 
C 3 5/7 
C 35/7 
t IMI 
C 33/7 
C 35/1 
C 3 51 
C 3 5/1 
C X5jT 
C 1 J/ì 
C 3.3/7 
C 3 VI 
C 1.3/7 


ite INAH rtutvv 157 


:_w ijsavf 
ite) DLOAli 

241 m ADI k 

242 SCRATCH 
)43 COLLCtT 
;*4(WY 
MS RFNAMF 
146 HAI KDf 
247 RH I TA 


C 3.57 
C 3 5/7 
e 1.5/7 
C 1 5/1 
C 35/7 
l 35/1 
C 551 
C 1.5/7 
OV? 


TUR 

NFXT 
DATA 
eNptri* 
INPUT 
r KM 

RE Al» 
LEI 

uomo 
ai IN 
fF 

ET .STORI 

GOSUB 
Ai TURBI 

RF M 

stop 

ON 

watt 

EtjAJJ 

SAVI 

VfrfilIY 

PFI 

PORt 

«LINI* 

PAINT 

CONT 

UtST 

CLR 

lmd 

SYS 

OPEN 

CL04C 

GFT 

N f W 

tAN 

to 

FN 
SPt ( 
THFN 
NOI 

5TKI 


24H RENUMItFAC 1.3/7 


"'m thv 
Ufi MUNITE IH 

251 USINO 

252 I INTU- 
BI WHILT 
254 

PI iiAF-t O 


L 1V7 

C JVT 
15.7 
JJ/7 
357 

Ben,i>nji 

thne 


NOTE 

(!) su C/16, i^lus/4 c C/128 la parola 
Mll)$ può anche essere un coman- 
do; la relativa routine è gestita in 
modo anomalo, 

(2) Su tutti i modelli il comando GO è 
gestito in modo anomalo (sul C7128, 
oltre che da TO, esso può anche 
essere seguito da 64). 

(3) La funzione RCìR non è imple- 
mentala nel Basic 2.0; l'inserimento 
di tale codice nel programma genera 
però effetti strani; si veda Larticok), 

(4) Checché nc dica il manuale 
(pagina H-4 della edizione in inglese) 
la funzione RLUM non è implemen- 
tata sul C/128; il valore 206 è usato 
per segnai a re che d successivo codice 
va gestito secondo La tabella aggiun- 
tiva seguente; 


206 I 
2% 2 
206 3 
206 4 
206 5 
206 6 
206 7 
206 X 
206 9 


POI 

BUMP 

PEN 

RSPPOS 

RSPR1TE 

RSPCOLQR 

XOR 

RWINDOW 

POINTER 


(fi) Su C lòe Plus/4 il codice 254 dà 
errore; sul C/l 28 il 254 è usato per 
segnalare che il successivo codice va 
gestito secondo la tabella aggiuntiva 
seguente (sono tutli dei comandi) : 


254 2 
JS4 .3 
254 4 

Ì54 5 
254 6 
24* 1 
254 K 
254 9 
244 ID 
254 n 
254 12 
254 13 
254 14 
244 15 
254 16 
254 17 
244 18 
254 19 
ISA 20 
244 21 
2M 22 
244 2Ì 
25* 24 
2M 25 
254 26 
254 17 
244 28 
2*4 29 
254 WF 
254 31 
244 33 
254 35 
254 36 
254 37 
254 38 


HANK 
MLT1R 
PI AV 
TEMPO 
MOVSPR 
SPRITT 
5PRCOLOR 
AK FU 16 ) 
ENVE LUPE 
SLftrP 
< ATALtKi 
DOPEN 

APPI Ntl 

DCLOSL 

HSAVt 

BLOAD 

RECOR Q 

CONCAT 

DVERJFY 

DCLEAR 

5PRSAV 

COUJSJON 

HHilN.7) 

RTNO 

WLNDOW 

BOOT 

WIOTH 

SPIDEt 

QU1T (Hi 

STASI! 

F ETC II 
SWAP 
OFF 18) 
FAST 
SL.OW 


(6) IL comando RREG. citato a 
pagina 20-3 ed a pagina K-7. non è 
documentato nell Encyclopaedia; la 
sintassi prevede che RRTXì sia seguita 
dal nome di una. due. tre o quattro 
variabili, nelle quali vengono im- 
messi nclfordine i valori dei registri 
interni P.AXY. 

(7) BEGIN. che avrebbe tutto il 
diritto di essere un comando, non è 
accettato se non dopo l'apertura di 
una II 7 

(8) QUIT e OFF non sono imple- 
mentati: ma sono accettati in fase di 
editing, e regolarmente listati. In fase 
di esecuzione generano il messaggio 
di non implementazione, e non un 
generico “SYNTAX ERRORE 
Sempre in contrasto con i manuali, si 
ha che GET# e GETKEY non sono 
veri e propri comandi; la loro gestio- 
ne avviene come sottocaso della 
gestione di GET; analogamente sul 
C71 28 il comando GD64 non ha un 
token proprio, e viene gestito nel- 
l'ambito di GO; infine le parole 
COLINI’, MOVESHÀPI , RSPR cita- 
te nel manuale del C/128, Appendice 
IC non esistono; le altre parole riser- 
vate (TL m S1\ DS. DSS, ER. EL) 
non hanno un token proprio, sono 
codificate in forma ASC 'Il standard, 
e vengono gestite a parte 
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(II) se T = 58 si salta alla fase (V); se 
T tisi va alla fase (III); negli altri ca- 
si sì chiama la routine eli errore: il la- 
voro deve cominciare a partire da 
un separatore! 

{(Il) giunli qui, è PEEKllJ-O; se ri- 
sulta PEEKSl t 2) : Osi salta alla mu- 
tine de! READY: it programma è 
finito. 

(IV) si esegue l'equi valente dell'o- 
perazione Basic: 

POKE57.PEEK*l + l): 

POKE 5H„PEEK(l + 2) 

poi si pone I 1 + 3 (ovviamente la- 
vorando sulle memorie 122 e 122: le 
variabili I e T esistono solo come ab- 
breviario ne dì linguaggio) 

(V) si guarda se è staio premuto il 
tasto STOP: in caso affermativo si e- 
segue la routine relativa. 

(VI) se è T -0 oppure T 58 si toma 
alla fase (1); altrimenti si va in su- 
bmutine alla fase (VII) e* ai rientro 
dalla sub muti ne. si torna alla fase 
(!) 

(VII) se risulta T(128 si assume che 
sia slato soppresso il comando op- 
zionale Let h e si salta alla routine re- 
lativa (sarà tale routine che verifiche- 
rà la correttezza della assunzione) 

( Vili) se è T{ 3 62 si esegue l'analo- 
go del Basic; 

ON T-I2H GOTO 05 indirt/y») 

(IX) se è r~ 203 (token JiGOJese è 
PEEK(I+1) 164 (token di TU) si 
salta alla routine del GOTO 

(XI) si salta alla routine di errore: 
c’è uno statement che non inizia con 
un comando. 

Naturalmente, nelle fasi (VII), 
(VlIIk (IX) Li sìngola routine chia- 
mata incrementerà T’ per leggere i 
parametri necessari. Se non ci sono 
errori la routine stessa terminerà con 
un R I S (analogo in L.M. del coman- 
do RETURN) restituendo la mano 
con un valore di T' corrispondente 
ad un separatore, cosicché il ciclo 
può riìmztare. 

Nella gestione dì tali routine si farà 
ancora qualcosa di analogo per 


quanto riguarda i codici da I XO a 202, 
che corrispondono alle cosiddette 
FUNZIONI: non ci occuperemo del- 
la gestione dei codici tra 163 e 1 79 per 
non appesantire troppo la tratta/ io- 
ne,,. 

Il codice stesso viene raddoppialo, 
ed in funzione dei valore ottenuto si 
legge in una apposita tabella l' indi- 
rizzo della routine cui saltare per fe- 
sedizione della funzione voluta. 

La tabella in ROM di cui parliamo, 
contiene, nell'ordine, la parte bassa e 
la parte alta dell'indirizzo; ad ogni 
codice corrispondono perciò due eie- 
monti della tabella, e questo è il moti- 
vo per cui il codice viene in i/i al men- 
te raddoppiato. Guardando in detta- 
glio la routine che gestisce lo smista- 
mento delle funzioni si può tuttavia 
notare che essa contiene un BUG 
(-errore): se ìl token incontrato è 
maggiore di 199 (i "veri" codici in 
questione corrispondono a LEETS. 
RÌGHT$, MIDS, cioè alle funzioni 
con più di un parametro) NON viene 
effettualo il controllo che il codice sia 
minore di 203. In casi come questo 
l'interprete salta direttameli le all’in- 
dirizzo fornito dalla tabella, con ri- 
sultati talvolta disastrosi dal momen- 
to che la tabella stessa, non è più affi- 
dabile per valori del token superiori a 
202 . 


ìjs prime sorprese 

Per fortuna il bug non è pericoloso 
(a meno che non si siano fatte poke 
"strane" nel programma) c token da 
21)4 in poi non dovrebbero essere in- 
contrati. Vi sono, però, due eccezio- 
ni: 

* la prima è il tentativo di eseguire sul 
C/64 programmi scritti per il C/16, il 
Plus/4 oppure il C/128; 

* la seconda è coi legata al codice 203. 
token del GO.che può essere staio in- 
serito per errore m un programma. 

Eseguendo una frase del tipo: 
PRINT GCXAS.2) 
il computer, anziché emettere un 
Synlax Errar, esegue un salto alla lo- 
cazione RAM 2701) L con risultati 
imprevedibili! 

Un problema analogo avviene in 
fase di LIST: ne) Basic 2.0 la ”dc- 


loken izza/ ione ( = traduzione) av- 
viene inviando alla routine di sm lu- 
pa, uno dopo 1 altro, i caratteri prele- 
vati da una certa tabella. 

A! l'interno di questa, la li ne di ogni 
singola parola chiave c segnalata da 
una lettera scritta in reverse (che sarà 
comunque stampata normale). 

Per risparmiare un byte di pro- 
gramma nella routine che gestisce il 
LIST, i progettisti della Commodore 
hanno strutturato hi routine tramite 
un ciclo che. dopo la stampa del sin- 
golo carattere, termina con l'istruzio- 
ne BNF E cioè: se il carattere stampato 
non è uno 0, continua il tuo lavoro, 
altrimenti prosegui). Naturalmente 
tutti i codici inviati alla stampa ut 
condizioni normali sono diversi da 
zero; e ciò resta vero anche per i codi- 
ci da 205 in poi. Al contrario, nella 
de*tokenizzazkme del 204, il primo 
carattere inviato alla stampa è in 
realtà lo Odi fine tabella; cosi dopo 
aver eseguito la stampa di un (illeggi- 
bile) CHRS{0L routine di I IST. in- 
vece di tornare indietro ad eseguire il 
suo lavoro, va avanti inserendosi nel- 
la routine successiva (che è quella 
che gestisce il comando EUR) ; etri ri- 
sultato di generare un Syntax Errar. 
Un'indica/ ione di come si milare tale 
bug per proteggere i programmi è in- 
dicato nel riquadro 2, 

Token diversi dal 204 non genera- 
no errare, ma provocano listati inat- 
tendibili: l'elenco di come (in fase di 
listi ng) il Basic 2.0 interpreta i token 
dei Basic 3.5 e 7.0 è fornito nella ta- 
bella del riquadro L alla colonna 
“Solo List". 

Altri casi imbarazzanti 

Torniamo ora alla distinzione dì 
casi ( VIE VII 1,1 X, X, X 1 ) s voi la da 1 1 V- 
secutore: essa dovrebbe essere chia- 
ramente motivala da quanto detto re- 
lativamente ai token dei comandi nel 
Basic 2 ri; così come dovrebbe essere 
chiaro che la casistica relativa ai Ba- 
sic più evoluti sarà piu complicata; e 
d’altronde la complicazione è spesso 
fonie dì errori. 

Esplìciti amo un bug. pei fortuna 
non grave, presente su C/16, Plus/4 e 
(.7128. legato alla gestione delle fun- 
zioni (token compresi tra 1 80 e 212): 
eseguito il controllo che il numero in 
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questione sia tra IK() e 212, e raddop- 
piato ancora il token da trattare, si fa 
ricorso alla solila tabella di smista- 
rne nto: ma bisogna eliminare il caso 
corrispondente al GO,,.; e qui i pro- 
gettisti i om inodore sono stati ai tra tri 
dal fascino del complicato: invece di 
porre nella tabella, in co e risponden- 
za al Tenti aia N.203, l’indirizzo della 
routine di errore, hanno pensato be- 


ne di scalare di un posto (due byte) 
lutti gli indirizzi in tabella corrispon- 
denti a codici superiori a 203: e di ge- 
stire ì codici superiori a 203 tramile 
un iniziale decremento del codice 
stesso! 

In realtà, oltre ad uno spreco di 
tempo c di spazio (due byte in più 
nella tabella “costano meno” del 
confronto e della corrispondente de- 


cisione) si è anche ottenuto di trattare 
il codice 203 come se tosse u n 2U2: col 
risultato che sii i Ih, Plus 4 e C 1 28 
la frase: 

AS = (JO(B$.X,Y) 

non genera un S>max l rror I né un 
rinvio a routine RAM come su Vie 20 
e C/64), ma viene tranquillamente e- 
seguita come se fosse stala scrìtta: 
AS- Mll)S(ll^X.Y) 


Come ottenere listati più belli o... non listabili 


Tutti sanno che lo scopo del co- 
mando REM c quello di permettere 
di inserire commenti in un program- 
ma, senza disturbare Teseci! /ione del 
programma stesso; non tutti sanno 
invece che, sempre senza pregiudica- 
re Tesecii zio ne dei programma, si 
possono inserire commenti anche in 
altri modi: ad esempio il seguente 
programma gira senza problemi sul 
C/64 (sul Vìe 20 basterà sostituire il 
432 56 di linea 100 con 51448; sui 
C/128 con 21135: su C/16 e Plus/4 
con 36272): 

liJCOSt 11 Ifìtl E NON SCRIVERE SVN- 
TAX ERROK :PKlVi "O.K" 

SO GOTO 200 SENZA PROTESTARE 
100 SYS 43 256 QUI St PUÒ’ S< RI VERE 
CIO 1 C H E SI VUOLE; RETI RN 
200 PRINT “SEMPRE Tt ITO O.K " 

La misteriosa SYS di linea 100 
chiama la routine ROM che gestisce 
i! comando DATA che si limita, sem- 
plicemente, a cercare, dal punto in 
cui è stata chiamata, la prima cella dì 
memoria che contiene un 58 (token 
dei ‘ due punti”) o uno 0( token di fine 
linea). 

I T a partire da tale cella che reseca- 
to re riprenderà il suo lavoro, 19 per- 
chè la riga 50 non causa problemi do- 
vrebbe essere ovvio. Per quanto con- 
cerne infine la linea 10 si tenga pre- 
sente che la routine dei RETURN, 
dopo aver calcolato l’indirizzo di ri- 
torno, cede la mano alla routine del 
DATA, che provvede appunto ad in- 
crementare tale indirizzo Uno a tro- 
vare imo 0 oppure un 58, 

Possia mo approfitta re d i quanto vi- 
sto pei migliorare Testetica dei nostri 


listati. Se, ad esempio, volete eviden- 
ziare una linea importante del pro- 
gramma, potete forzare il computerà 
listarla in Reverse, procedendo come 
segue. Sia da evidenziare la lìnea: 
500 POR X=I TO IflthREM CICLO 
PRINCIPALE 

Si scriva tale linea nella forma: 

500 SYS 43256 %% : EOR X=| TO 
100: REM CICLO PRINCIPALE 
e si aggiungano provvisoriamente le 
linee : 

4*)K POR X = PFEK(61)+256*PEEK(62) 
TO X + 1000: IKPEEK(X>*PEEK{X4-|) 
<> 37 #2 THEN NEXT 
499 POK£ XJ3 ; POKE X-HJ8 : END 

Eseguito: RUM 498 (return) 
basterà poi sopprimere le linee 498, 
499 ed il gioco è fatto: la POK E ha so- 
stituito ì due token 37 {corrisponden- 
ti ai due simboli di percentuale %%) 
con 13 (token deliba capo ) e con 18 
(token della scrittura in reverse. 

L'uso delle locazioni 69, 62 è moti- 
vato nell'articolo: il trucco, cosi come 
è descritto, funziona sul C/64, ma le 
modifiche da apportare per gli alil i 
modelli sono semplici: il diverso in- 
dirizzo della SYS è già stato indicato: 
su C/16, Plus/4 e C /128 non si può fa 
re uso delle locazioni 61. 62 (gestite in 
modo diverso) ma basta far partire i9 
ciclo da inizio Basic. 

Su Vie 20 e C764 possiamo anche a- 
dnttare quanto visto alla protezione 
dì programmi: un trucco già segnala- 
lo su questa rivista è quello di inserire 
come prima linea del programma: 

0 REM L 

dove il carattere che segue la REM 
(che sembra una “LT maiuscola) si 
ottiene invece premendo il tasto Shift 
e contemporaneamente la lettera L, 


In effetti tale cara nere, corrisponden- 
te al token 2U4, provoca un S3 N J AK 
E RROR in sede di listi ng: ni coman- 
do LIST seguirà solo 

0 REM 

seguito da "SYNTAX E RROR”. 

E' tuttavìa facile sbarazzarsi di que- 
sta rudimentale proiezione; basta 
eseguire 

LIST I- 

v si kuge tutto il resto del programma op- 
pure, più seni pii ceni imi te, si può sopprimere 
la linea 0 ehe* iniziando con REM, non do- 
vrebbe contenere parti essenziali del pro- 
gram ma. 

Un raffi ri a mento del truce» si ottiene (su 
1764; le tarmili perii Vie 29 sono ovvie) in- 
serendo le linee : 

0 SYS 43 256* :G OSI; »B456:X= A( 1 1) 


*** 

23456 SYS 43256* iDIMAtM): READ A, 

r,c: 

23458 SYS 43 2 56*: segui la du altre forme 
dì proiezione ( disabilita /ione dei LIST, 
dello STOP, del Run/Stop & Kestore...) 
23460 SYS 43256*:RETI !RN 

m m 

poi, tramite delle PO KIT sì sostituì- 
rannogli asterischi col codice proibi- 
to 204. Si osservi che, fuori da una 
REM, il codice 204 va inserito nel 
programma tramite una POKL. e 

non digitando SHIFT4L: infatti, 
nella costruzione di linee Basic, la 
routine di tokenizzazione sopprime t 
caratteri semi-grafici non preceduti 
da REM o non racchiusi tra virgo- 
lette 

E' chiaro che ora la soppressione 
pura e semplice delle linee che gene- 
rano un “SYNTAX E RROR provo- 
cherà guai notevoli in sede di esecu- 
zione,.. 
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con risultati non sempre identifica- 
bili, 

Resta da capire il senso dette fasi 
(1), (111}, (IV) del lavoro dell'esecuto- 
re. Per quanto concerne la fase (I) 
(che esiste solo nel Basic 2.0) si osser- 
vi che PEEK(123)-2 significa che si 
sta interpretando un pezzo di pro- 
gramma scritto nel cosiddetto Buffer 
bASICi in altre parole si sta eseguen- 
do un comando diretto, e non una li- 
nea di programma. Nc consegue che. 
su Vie 20 e C/64, durante l’elabora- 
zione di u iì programma le memorie 
61 e 62 "puntano’ sempre all'ultimo 
separatore incontrato. Il Basic utiliz- 
za tale informazione in occasione, 
tra l’altro, del messaggio REDO 
FROM START per sapere da dove ri- 
prendere l'elaborazione; l'utente sma- 
lizialo può utilizzare la slessa infor- 
mazione per vari scopi; un esempio è 
fornito nel riquadro 2. 

Per quanto concerne i modelli suc- 
cessi vì t il Basic 3.5 utilizza diretta- 
mente le memorie 6 L 62 per leggere il 
token da interpretare (senza cioè fare 
uso delle memorie intermedie 122 e 
123): sul C/128 la situazione £ analo- 
ga. ma si usano le locazione 63,64 an- 
ziché le 60, 62. 

Pei capi re le fasi ( TI I ), (IV) del lavo- 
ro dell'esecutore abbiamo invece bi- 
sogno di qualche informazione sul 
lavoro dell 1 'editore" Cioè su che co- 
sa avviene nella cosiddetta fase di "e- 
diting '. quando digitiamo una linea 
di programma. Anche qui è bene 
spezzare il tulio in piu fasi 

Quando sì scrive 
un programma 

Supponiamo di avere in memoria il 
programma (brevissimo, per semplifi- 
care); 

1000 PRINT CIAO ' 

1010 END 

Per sapere come tale programma è 
memorizzato nella RAM del nostro 
Commodore, basta eseguire delle 
PEEK, a partire dalla cella preceden- 
te a quella "puntata ' da 43,44 (su 
C/12N si sostituisca 43,44 con 45.46) 
cioè eseguire: 

FOR PEEK(43)+25Ó*PEEK<44> 

1 

I O X+50: 


PKtNT PEEKtXX: 

NEXT (return) 

Il numero 50 è scelto ad abundan- 
tiam: solo i primi dati saranno signi- 
ficativi Interpretiamo i dati che ver- 
ranno stampati, 

(A) innanzitutto verrà mostrato uno 
0; si tratta del codice di inizio 
Basic. 

(B) Dopo taleO si troveranno due nu- 
meri che chiameremo provvisoria- 
mente LI, L2: il loro valore dipende 
dal Commodore su cui st sta lavoran- 
do: sul C/64 si avrà 1 3,8; sul Vìe 20 6 
nespanso si avrà 1 3,16; sul C/ 1 28 si a- 
vrà 1 3,2 H; eccetera, 'orneremo presto 
sul significato di questi due numeri, 
che si: chiamano "link alla linea 
seguente \ 

(C) i due numeri successivi sono 232 
e 3. Sì tratta del numero dì linea (1000 
nel nostro caso) scritto nella solita 
forma parte bassa - parte alta: in 
effetti 

232 + 256 * 3 = 1000 . 

( D) Solo adesso comincia d vero pro- 
gramma; il numero successivo è 153. 
codice del comando PRINT (si veda 
la tabella del riquadro ! ); segue il nu- 
mero 34, codice delle virgolette; poi i 
numeri 67. 73, 65, 79, codici di C l A 
O rispettivamente; ancora un 34, co- 
dice delle virgolene; ed unoO. codice 
di "line linea" 

(E) La situazione sì ripete ora analo- 
ga a quella vista a partire da (B): si 
hanno due valori “di link", diciamo 
L3, L4; poi i numeri 242 e 3. rappre- 
sentazione in forma bassa - alta del 
numero di linea 

( 10 10™ 242+256*3) 

segue il numero 128, codice del co- 
rnando END; c lo 0 di fine linea, 

(E) Per analogia dovremmo ora a- 
spettarci una coppia di numeri di 
link; però il programma è finito....; in 
effetti troviamo una coppia di zeri 
che, cóme vedremo, esprìmono esat- 
tamente il fatto che il programma è 
finito. 

Precisiamo ora il significato dei ter- 
mini di link: qualunque sia il compii- 
le!’ su cui stiamo lavorando, il nume- 
ro LI + 256*L2 fornisce La cella di ini- 
zio della prossima linea Basic (cioè 
la cella successiva a quella che con- 
tiene il codice zero di fine linea attua- 
le); analogamente per L3 + 256*1.4, In 
generale i due numeri di link sono 


perciò vili puntatore (nella solita for- 
ma bassa-alta) che fornisce il nume- 
ro d ordine (in termine tecnico l ‘in- 
dirizzo) delta cella RAM dove inizia 
la linea Basic successiva. Tenendo 
conto del fatto che il programma Ba- 
sic non può essere scritto in una zona 
RAM con indirizzo tra 0 e 2^5 te la 
cosiddetta Pagina 0, riservata ad altri 
tipi di memorizzazioni) in condizio 
ni nomi ali il secondo dei valori di 
link non può essere uno I); ed il Com- 
puter mette uno zero in tale posizio- 
ne q ua ndo \ unle segn ala re eh e i I pro- 
gramma é finito; risulta così chiarito 
il senso della fase (IH) del lavoro 
dell’esecutore. 


Dm "è la linea? 

Chi conosce un po' di terminologia 
nell'ambito della rappresentazione 
dei dati non avrà difficoltà a ricono- 
scere nella struttura che abbiamo ap- 
pena descritto una "lista unidirezio- 
nale”: ogni “dato" (-linea di pro- 
gramma) comincia con un puntatore 
al dato successivo. La lista è unidire- 
zionale perché non sono toni ite indi- 
cazioni per risalire da una linea a 
quella precedente. Indipenden te- 
merne dalle proprie conoscenze suite 
strutture dati, dovrebbe però essere 
ovvio un algoritmo per verificare se 
esiste una data linea e, in caso affer- 
mativo. costruirne l'indirizzo d’ini- 
zio: basterà sviluppare le fasi seguen- 
ti: 

( I ) si pone 

1 = PEEK(43)+256*PEEK(44f I 

sul C/128, invece: 

1 - PEEK(45)+256*PEEK(46)-I 
(in quest'ultimo caso le PEI k che 
seguono dovranno essere fatte nel 
banco N fi); 

(2) se PEEK(I+2)-l) la lista è finita; 
si esce da! ciclo con risposta nega- 
ti va 

(3) se PEEK(!+3)+256*PEEK(1+4) 
è maggiore del numero cercato si e- 
sce dal ciclo con risposta negativa 

(4) se PEEKf I +3) + 256* PF EK( 1+4) 
è minore del numero cercato, si pone 
I = PE EK(1 + 1 ) + 256*PKEK| I + 2)1 e 
sì toma alla fase (2), 
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(5) se si è arrivati gai. la ‘Vera’ linea 
cercata inizia nella cella 1+5; da l + I 
a 1+4 si hanno informazioni comple- 
mentari, 

Si osservi che queste fasi vengono 
eseguite dal computer in varie situa- 
zioni: in seguito al comando LISI, 
nelle sue varie forme; in seguito a co- 
mandi quali RUM GOTO. GOSUB 
e THEN seguiti da un numero di li- 
nea; in seguito a ON„. GOTO e ad 
UN... GOSUB; e anche in fase di 
scrittura di nuove linee di program- 
ma. 

In quest'ultimo caso il lavoro è im- 
probo; occorrerà: trovare il giusto 
punto in cui inserire la nuova linea; 
eliminare un'eventuale linea già esi- 
stente con In stesso numero, riacco- 
stando poi le linee che seguono; fare 
spazio alla nuova linea spostando in 
avanti tulle quelle che seguono; inse- 
rire la linea (dopo la sua token izza- 
zio ne) nello spazio crealo Vanno poi 
ricostruiti tutti i link; ed in line* salvo 
che sul t7 128* viene eseguilo un 
CLR. Per fortuna ci pensa il compu- 
ter: noi non ce ne accorgiamo, salvo 
quando modifichiamo una delle pri- 
me linee di un programma molto 
lungo: la ricomparsa del cursore si fa 
allora aspettare, ed è giusto che sia 
così.... 


Quando si esegue un ordine 

Occupiamoci ora di ciò che avviene 
in fase di esecuzione; una volta otte- 
nuto il corretto valore I del punto di i- 
nizio delleìaborazione (in seguito ad 
un "RUM" c semplicemente I - PfT K 
(43)+256 *PEEKj( 44H; in segolo a 
GOTO, GOSUB o RUN seguili da 
un numero di linea il valore di I è cal- 
colato come visto prima) il comando 
delle operazioni viene preso dalla 
routine NSE descritta all'Inizio del- 
l'articolo; routine di cui siamo anzi 
ormai in grado di interpretare corret- 
tamente la fase (IV): alfi trizio di ogni 
nuova riga Basic l e s editore pone 
nelle memorie 57, 58 (sul C/128: nelle 
memorie 59 e 60) il numero della li- 
nea Basic che si appresta ad eseguire: 
in altri termini, d uranio l’esecuzione 
di un programma, le istruzioni: 


NL PEEK(57ì + 256*PLLK(58) 

forniranno in NL il numero di li- 
nea attualmente in elaborazione 
mentre in fase di esecuzione di co- 
mandi direni il contenuto della loca- 
zione 58 è 255. iroppo grande per es- 
sere confuso con la parte alta di un 
numero di linea L'uso che il compu- 
ter fa di tali i riforma zio nJ è* con un’u- 
nica eccezione, solo di tipo diagno- 
stico: l'informazione è, sfruttata pc re- 
ni ette re i messaggi di errore corredati 
dal numero di linea in cui l’errore è 
stato incontrato. L'eccezione concer- 
ne la gestione di comandi del tipo 

“GOTO N'\ nella quale te fasi (1) 

(5) di ricerca della linea voluta elen- 
cate precedentemente vengono acce- 
lerate col seguente artificio: se risulta 
N<- P E EK(43)+ 256* P E EK(44) .si 
procede esattamente come già visto; 
se* al contrario, risulta N)PEEK(43) 
+256 *PEEKj( 44). la fase (1) viene 
modificata: per costruire il valore ini- 
ziale di \ si procede in avanti, a parti’ 
re dalla cella in esame, fino a trovare 
uno 0 { ~ fine linea ); c si sceglie come 
I iniziale l'indirizzo della cella conte- 
nente tale 0. 

Visto FUSO che il Computer fa del- 
le memorie 57, 58, ci si può porre il 
problema di quali ABUSI può com- 
mettere su di esse fu tenie smaliziato; 
alcuni di tali aspetti sono stati discus- 
si ii di' articolo “Due memorie molto 
strane \ CCC N.29. Chi non ha letto 
tale articolo può dare un'occhiata al 
riquadro 3 qui in cui sono mostrati 
alcuni pericoli connessi alla manipo- 
lazione tramite POKE dei numeri 
di linea. 

Per i "fedelissimi aggiungiamo 
che gli "strani” comporta me mi visti 
nel riquadro 3 dell 'areico lo suddetto 
possono ormai essere compresi, le- 
nendo conto da un lato delle infor- 
mazioni qui fornite* e dall'altro del 
fatto che. in sede di INPUT, l'inter- 
prete pone nel BUFFER Basic uno 0 
al termine del dato immesso: tale 0 
viene successivamente interpretato 
dall'esecutore come un fine-lìnea, e 
quindi resecatole procede come nel- 
le fasi (III), (IV) eccetera. 

Questo stesso fenomeno spiega an- 
che il bug segnalato ueirarticolo "La 
virgola è mobile", CCC N.27, 


Linee indelebili e linee 

irriconoscibili 

Se, una volta proceduto come indi- 
cato nel Riquadro 2, si vuole aggiun- 
gere u n’u Seriore protezione al pro- 
gramma, si può eseguire il comando 
diretto: 

POKE PLEK(43}+ 256* PEEk(44 )+ 4, 

250 <R) 

Tale operazione "rimi mera ’ la pri- 
ma linea di programma assegnando- 
le i! numero 64000; eseguendo un 
IJST si otterrà: 

641MM* SYS 43256 

seguito da SYN VAX ERROR; d'al- 
tronde la linea in questione e ora in- 
de! eh de: provando a digitare: 

64000 {rcluoi} 

si otterrà solo SYNTAX ERROK li nu- 
me ri di line-iti iininu'ssi tarmo da 0 a 59999); 
ed limi tra miche i\ tentatilo di far li stura il 
resto dd program ma (digitando MST l- 
59999 anziché solo LIST) naufraga mise- 
ramente incontrando la tinta fiOlìOO il 
computer ritiene di avere esaurito il suo 
compito, e non listerà nulla. 

t ale tecnica ha due cord roindi ca /ioni ma 
i rimedi sono semplici: 

* l'operazione di ri numerazioni va effettua- 
ta solo se si è sicuri di non dover ulterior- 
mente modificare il programma: quando é 
prese n le la linea 64000 i! tentativo di cor- 
reggere, ad esempio, la lìnea 1000 non mo- 
dificherà affililo la vera linea MMI0, ota ne 
costruirà un'altra che sarà inserita prima 
della linea 64600. Il rimedio ovvio è esegui- 
re la rimi mera/ ione solo a opera finita. 

• se ìf programma presenta dei "GOTO al- 
rjndieLro’\ come ad cs. 

5500 GOTO UHM 

in fase di esecuzione si otterrà il mes- 
saggio Ulule fd Statement, seguito da 
ERROR IN 5500 ed il motivo è chia- 
ro: cominciando la ricerca da inizio 
Basic, ed incontra lido per prima la li- 
nea 64000, il coni pii ter riterrà che la 
linea 1 OCX) non esiste (leggendo l'arti- 
colo si capisce perche liu tale proble- 
ma non si pone nei "GOTO alfa va li- 
ti”). 

Se il programma prevede rinvìi al- 
l'indietro basterà inserire, nelle linee 
di di sabbi razione 23456-23460, an- 
che un'istruzione di ripristino del nu- 
mero di linea iniziale: 

POKE PEL K<43 )+ 256* PE EK(44) 4 4,0 
ed il gioco è fatto! 
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Conversione dec/esa 

( 20953 / 21106 ) 

» t ara (té \icsvand r<n d* Si^iiirh 


Chiunque programmi in Linguag- 
gio Macchina conoscerà certamente 
l’importanza della numerazione esa- 
tteci male. 

Il codice riconosciuto dal compu- 
ter. e che può contenere una locazio- 
ne dì memoria* è un insieme di otto 
cifre in base 2 , vale a dire che gli unici 
valori emessi cd accettati dal micro- 
processore sono lo zero e l’uno, che 
vengono chiamati anche livelli logi- 
ci, perchè corrispondono ad una par- 
ticolare situazione elettronica di pre- 
senza (1) ovvero dì assenza (0) dì 
tensione. 

Questi otto stali o livelli logici* com- 
binandosi diversamente Ira di loro, 
possono dare luogo a ben 2,^6 combi- 
nazioni differenti. Supponendo di a- 
vere il codice binario seguente..*: 

(HO! HH I 


.Jl valore è espresso in codice bina- 
rio, esattamente allo stesso modo in 
cui noi scrìviamo i nostri numeri in 
base 10. Quell'accozzaglia di uno e di 
zero corrisponde dunque a: 


0*2 

1*2 


7 + 
6+ 


0*2 I 5 + 


1*2 

1*2 

0*2 


4 + 
34- 
2 + 


1*2 f 1 + 

1*2 f 0= 


91 


Non è diffìcile accorgersi della no- 
tevole complessila di un tale sistema 
dì numerazione, almeno per l'uomo, 
che è abituato a ragionare in base 10 
(chissà se avessimo avuto solo X dita 
che cosa sarebbe successo!). 

Per ovviare al Li neon ve niente indi- 


cato* i matematici hanno pensato be- 
ne di dividere quella cifra cosi com- 
plessa in due partì (dette "nihble") 
attribuendo a ciascuna di esse un co- 
dice alfanumerico a seconda del nu- 
mero indicato 

Ne segue che* ad esempio: 

%0!0l = $5 = f 5 
%10l I ~SB- T H 

in cui il simbolo di percentuale (%) 
indica un numero in notazione bina- 
ria, il simbolo del diesis ( ft) la nota- 
zione decimale e quello del dollaro 
(k) indica In numerazione esadecì- 
male (a base Ih). 

In quest' ultima, oltre ai numeri, so- 
no utilizzate le prime sei lettere del- 
IWahcto e ciò per sopperire alla 
mancanza di adeguati simboli per 
indicare numeri superiori a IO. Que- 
sto latto, anziché complicare la si tua - 


1000 PR INTCHRSC 147 > ,J C0NUERS IONE 
DEC I fi ALE- ESADEC I MAL E " : PRIMI 
1010 PR INT^ESEMP IO D'USO: 11 : PRIMI 
1080 PRIMI "SYS XXXX , #180*' ; PR I NT rt 
SYS XXXX p S00FB " : PRIMI 
1030 PRIMT”U1ENE U I SUAL 1 22AT0 IL 
UALORE DEC I MALE OPPURE ESA 
DECIMALE” 

1040 RETURN 

1050 DATA 038,115,000,801,035,84 
0,008,801 ,036,840 
1060 DATA 063* 168*088, 076,055, 16 
4 „ 038 ,115* 000 , 032 
1070 DATA 130 , 173 , 038 ,847,183,16 
S , 036 p 038 ,071,171 
1000 DATA 160 , 001 , 1B5, 080 , 000 , 07 
4,074,074*074,801 
1030 DATA 010,144,003,084,105,00 
7, 105 , 048 , 038 , 071 
1100 DATA 171,105, 080 , 000 , 041 , 01 
5,801 ,010, 144,003 


1110 DATA 084,105,007,105,046,03 
8,071 , 171 , 136,138 
1180 DATA 000,016,815,036, 160,00 
1,169,035,038,071 
1130 DATA 171 ,038, 115,000, 056, 83 
3,040.040*170,501 
1140 DATA 010,144,010,833,017,04 
6,170,801,006,176 
1150 DATA 166 , 105,010,010, 010, 01 
0, 010, 153,080,000 
1160 DATA 038 , 115,000, 056 , 833 , 04 
8 , 040 , 149 , 801 ,010 

1170 DATA 144,010,833,017,048,14 
1 , 801 ,006,176, 137 

1160 DATA 105,010,085, 080,000, 15 
3,080,000,136,138 
1190 DATA 000,016,194,166,080,18 

5,081*038,805,163 
1800 DATA 038 ,115, 000 , 036 ,-1,134 
76 
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/ione, come porrebbe sembrare a pri- 
ma vista, anzi la semplifica* perchè 
semplicemente accostando i due nu- 
meri ottenuti <55 e SB, ad esempio) 
otteniamo la cura esadecimale che 
corrisponde appunto al nostro #91 
calcolalo prima; 

5* 16 f l + II* 16 

1 va maggi della numerazione esa- 
dec tinaie sono molteplici: innanzi* 
tutto qualsiasi valore riconosciuto 
dal microprocessore sarà espresso 
con due soli simboli (%l 1 1 1 1 1 1 L = 
f 255 $FF). In secondo luogo, ma 

non memi importante* così facendo 
il programmatore ha sempre sol l'oc- 
chio la situazione interna (e quindi 


hi nana) della macchina, perche con 
un po’ di allenamento non è di Itici le 
imparare u memoria ta ta bellina di 
conversione da binario (con 4 sole ci- 
fre) ad esadecimale (tino ad "l'ì, per 
poi fare rapidamente tutte le conver- 
sioni di cui ha bisogno, 

Naturalmente, alla conversione da 
decimale ad esadecimale e viceversa 
provvede la mim-routine presentata, 
con una sintassi veramente semplice: 

SYS DEC ESA, ! numero decimale 
oppure 

SYS 1>ECESA,$ numero esa deci- 
male 

Automaticamente, dunque, a se- 


conda del simbolo che è anteposto al 
numero, il programma distingue ie 
due basi numeriche del numero che 
segue e converte lo stesso nell'altra. 

Importante sottolineare il latto che 
il massimo valore accettalo è T 65535 
e, naturalmente, SI I H 

Per quanto riguarda i valori esade- 
cimaii. è necessario che vengano in- 
dicati tutti i 4 valori che compungono 
il codice a I fi bit, anche se corrispon- 
dono a zeri in posizioni non signifi- 
cative (non $Hi dunque, ma 
$001 R), 

Gli algoritmi utilizzati da questa 
routine sono alquanto interessanti, 
per cui cosigliamo vivamente dì pro- 
cedere ad una analisi dettagliata del- 
la stessa. 


10 REM DINOSTRAT IUQ DEC^ESA 
£0 X-B0953:RErt INDIRIZZO 5U66 
ERI IO SU C.CX, 

30 PRI NT "CONVERSI ONE DECltlALE: 

#1S3S6 n 


40 5YSE0953, #10366 
50 : 

60 PR INI : FR I NT "CDNUERS 1 ONE ESA 
DEC I HAL E t EC0 F A J * 

70 SY380953, scopa 
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Come utilizzare le routine 


... : , • ‘ -, 


•• 


. : ••• •. - 

• - .-A 1 . ' • '/■ 


kj ul N.31 di Commodore Computer Club t delle due forme sintattiche che si riferiscono, 5 ' Effettuate una copia di sicurezza dd prò 
mirrata una nuova rubrica che he b scopo di rispetti vanente, ai possessori di nastro q grani ma che rappresenta la "fusione" dei due 

venire incontro ai principianti (senza trascu- disco; listati ("Caricatore 1 ' + routine Bmc 

rare gh esperti), che desiderano potenziare af Lo a( ì “Nuovo Sistema" 1 1 pubblicata}, 

massimo le camwmtìche del pregno Load "Nuovo Sistema" Al 

computer, 6 DopoavcT digitato Run, alla domanda 

n „ . * ; . Subito dopo digitate NEW e premete il ta- quale locazione?” rispondete con l indìrì^o 

Il Basic presenta, infatti, carenze notevoli , tn o„ tl . ril , . , ,, h , 

che possono esser limitate ricorrendo *lTu*> ^ ftw c ne “° f» ^^delb rou^ 

di routine in linguaggio macchina U..M). è 2' Caricate il programma "Fissa Top di me- tìne ' e 1 P 11 “ cuni 

sufficiente attenersi alle istruzioni pubblicate moria" e lanciatelo coi solilo RUN. Alla do- sccon 1 vlsua VfXA ' c< * me ; . -J.;.. lU * e ' un 

per utilizzare i sottoprogrammi LM con la manda Ultima locazione? di gttate 200G0 e. .. * 

" J b! ann.-Kf. mun rr.'ir.i di IVAi * É ' i fili 


massima semplicità. Gli "esperti" potranno alla successiva richiesta di conferma* premete 


fare a meno di seguire le istruzioni ed utilizza- 
re di retta mente i programmi L.M. pubblicati, 

I principianti, invece, 4 opportuno che leg- 
gano con attenzione le "istruzioni per Vitto” 

0' Se questa £ la prima volta che leggete la 
rivista, accendete il vostro Commodore 64 e 
saltale ai punto N.2. 

1 f Accendete il computer e, se desiderate 
"fondere" alcune (o tutte) le routine di que- 
sto numero con quelle tratte dai numeri prt* 
cedenti (a patto, ovviamente che ne siate m 


ii tasto "S” l e idi! e informazioni che appaio- 
no sul video possono esser comprese solo da-, 
gli esperti; i principiami possono tranquilla- 
mente ignorarle e saltare alla prossima fase 
(N.3). 


(oppure il messaggio "Errore di trascrizio- 
ne”), interrompete il lavoro (tasti Run 'Stop e 
RestOie) e verificate con attenzione quanto 
avete trascritto dìi rivista 
Se, invece, compaiono messaggi "confor- 
tami” (Routine allocata da., a.,. Attivare 
con Svs... ed altre informazkmi comprensibili 


, 2 4 , 4 . . „ . -, -, dagli esperti), digitate il programma dimo- 

3' Caricate (o digitate dalla rivista) il prò- . 

■ , , strativo e lanciatelo: da questo momento ave- 

e r&mma Mancatore' , . ■ . .. *** j 

te a disposizione una nuova routine LM da 

■ . . .-T ■ ■. 

^ . attivare mediante SYS come indicato nelle 

; ; ; istruzioni pubblicate per ciascuna routine. 


sto numero con quelle tratte dai numeri pie- 4 1 Digitate dalla rivista la routine che intere^ 
cedenti (a patto, ovviamente che ne siate in sa (scritta sempre in Basic, contenerne in pre- 
possesso), caricate il file -programma "Nuovo valenza istruzioni Data e numerata da 1000 in ? 1 Ripetete le operazioni, dal punto 3 in fan. 
Sistema” (nome standard adottato) con una poi), per ciascuna routine pubblicata che intendete 


FISSA TOP MEMO 


iiÉÉÉlÉ 


”FINE: 'T 
180 tF T<-X THEN 


' 

-, - 


170 


180 tF T<-X THEN RUN 18 0 Y—l:G0SUB 1000 . PRINT : INPUT 

_ £ 190 PfUNT :PRINT' CONFERMI? (S/N) "VA QUALE LOCAZIONE ' f X 

100 PRlNTomt( 147) FISSA TOP DI <* 190 READ W:Y~Y+1:IF W< 0 THEN 21 

MEMORIA*’ 200 SET A$:IF THEN 200 0 

110 INPUT "ULTIMA LOCAZIONE ", X : 210 IF A $< > "$" THEN RUN 200 GOTO 390 

X~*2Ì 220 FRIHT: INPUT "NOME FILE" ; AM ZIO PRINT" PRIMA LOCAZIONE *"Jf 

112 PRINT FRI NT"' t VALORI ATTUAI 230 PRÌNT"l - CASSETTA" ‘ :PR1 NT" 2- 220 PRINT"UITIMA LOCAZIONE - l, Jf+ 

i soNo.- FRiAnr disco* r-i; PMNT 

113 Xl~IKT(X/256} : X2-X-(X1*256) 240 0ET Bt.IP BM&r* THEN 240 200 PRINT"* CONFERMI ? (S/N)" 

115 PR1NT"FEEK(55) , "PEEK(55) ;PR 250 fF THEN W-l.GOTQ 28G 24G GET AS.-1F AS~"" THEN 240 

l/Vr' FFFKr55> f "PEEK(56) 260 IF THEN W-S;GOTO 2B0 250 1F At- 'S" THEN RETTORE .T-X 

116 PRINT" FRE(0) r FRE(0) 270 GOTO 240 .007^0 280 


117 PRINT SPRINTI VALORI NUOVI: 
SAREBBERO / L PRINT . PRINT 'PEE 

118 PRINT "PEEK(56) : "X1 

120 PRINT : PRINT' CONFERMI ? (S/N) 

130 IF PEEK< 197) -64 THEN 130 
138 IF PEEK(197)< >13 THEN POKE 
198,0: RUN 

■50 PO KE 55.X2.POKB 56 T XI : PUNÌ 
60 

160 PRtNT' FRE(O) : ‘FRE<0) . PRINT: 
PRINT "NEW" 

„ „ 

S>IYE Z0JM 


270 GOTO 240 
280 PRlNTCHRt(14?) ; 

290 PQKE 198,5;PÙKE 63l f 19:POKE 

632,13tP 0KE 633A3.PQKE 63 
4 r 13:P0KE 635,0 

300 Xl~TNT(X/256} ;X2-X-(X1*256) 
:PRINT t "PT44 r "XI " :FT43 r "X2ì 
310 Yl-ÌNr<T/236) :Y2-T-(n*256> 
:PRINT'' ;PT46."Y1'" :PT45, "¥2 
320 PRINT . PRINT : PRINT" SM "CHRt( 3 
4}A$&nt$<34>"."V".V‘ 

330 PRINT : PRINT : FRI NT : PRINT :PRl 
NT"$YS64?38" 

. : . • - 
:•.• ' ■ - ■ • : • - ■ ■ 

caricatore 


GOTO 280 
RUN 




150 PRlNTCHRt( 147) : INPUT " L0CAZ 

IONE INIZIALE* r X 15 

160 INPUT "LOCAZIONE FINALE" :T 
170 PRINT PRINT INÌZIO:* X?PRINT j£ 


150 REM PER UTILIZZARLO . LEGGI 
LB ISTRUZIONI PUBBLICATE SU 
160 REM COMMODORE COMPUTER CLUB 


26 0 RUN 
;P0KE 270 ; 

KE 63 28ù GOSUB 1000 PRINT : FRI NT" ATTE 

NDERE, * > ,r : PRINT :W-G 
*256) 290 READ B : IF B>-0 THEN FOJCE T* 

-X2> BsT-T+ÌrW-W*BiGQTQ 290 

*256) 300 RE^O B, IF B< )W THEN PRINT :P 

•‘Y2 RINTCHR$( 18) "ERRORE DI TRAS 

Ìmt(3 CR1ZIONB" :END 

310 PRINT ROVTINE ALLOCATA DA”X 

T .p R i ' A' T-V'CQMPR.'" .PRINT 

320 PRINT" ATTIVARE CON SYS“X:PR 
1NT 

330 Xl-INT(X/256) :X2~X-(X1*256) 
: PRINT'*PGKE44 , M XI " :POKE43 
X2 ■ 

„ • 340 Yl-INT(T/256) : Y2-T-(Y1*256) 

EGG I . PRINT" :POKE46 r "YV‘ : POKE45. 

TE SU "Y2.END 
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f-jB . ; 

s^«ì: 


. 


V; ., . 

*‘Co3 lesionare ' non dimenticando di digitare 
NEW dopo ogni felice conclusione della fase 
N.ifr. Ai principianti consigliamo vivamente di 
trascriverle tutte in modo da aumentare la 
propria esperienza e, soprattutto, per evitate 
incomprensioni degli articoli che leggeranno 
su Commodore Còniptiter Qtib, 

> r : v-v: 

X Caricale dopo un nuovo NEW', il program- 
ma L Save Zana Ram" e, dopo il Run. alia 
domanda "Da quale locazione?" rispondete 
con 2fKWX>. Alla seconda domanda "A quale 
locazione?*' ripondete digitando l’indi rizzo Fi- 
nale delJultima rouiinc trascritta. A seconda 
se avete un regisiratoje oppure un drive, sul 
nastro (oppure sul disco) vi ritroverete, dopo 
aver risposto alle varie domande* il file- 
programma “Nuovo Sistema” (nome clic sug- 

j- ! 

geriamo di assegnare quando compare la rela- 
tiva domanda), Tale fi le -programma (da cari- 
care come indicato al pomo 1 ) sarà utilissimo 
sia per arricchire la vostra raccolta (trascri- 
vendo le routine (lèi prossimi numeri di Com- 




modore Computer Club)* sia per utilizzarle in 
vostri listati. 

■■■ 

y ' Digitate SYS M7^8 oppure premete il tasto 



vostri listati, 

■ 






5 -. 1 i 
. 5* 

‘V'. -•-< 




sfe® di Reset (se lo possedete) in modo da rimette- 
re “a posto' " il computer Caricate tf program- 
ma “Fissa Top dì memoria” e rispondete con 
20000 alla domanda che vi porrà: da questo 
momento poi eie disporre sia delie consuete 
istruzioni Basic che delle routine LM richia- 
mabili con k t?orn spendenti SYS Non di 

I 

men ficaie di ripetere la presente Fase (N, 9 ) 
tutte le volte che premete il tasto di Reset n 

dopo un reset software (SYS 6473&). Se , invc 

■ ' '■■; -- ']■ ■■ ■ •:- . •■ 

ce. spegnete il computer, sarà necessario ai- \ 
luare la fase N. 1 e N h 2 |>er inserire nuovamen- 
te nel calcolatore le nuove routine cd usarle 
senza pencolo. 










_ 


" 4' 




\ ....... .-V- ■: ? .'. , : 


Collaborazione dei lettori > 




:S. 

■ • ••. : 


I 


Usi •.■ 




■ ■■:■■■■ --• ■■ 

1 lettori che intendono coltatxjrarc devono 
inviare (almeno) tre routine, relativi listati di- 





H§; % ': ■ 


striglivi ed articoli esplicai Ivi, \jì norme da 

seguire per la stesura dei listati e piuttosto rigi- 
de, per ovvi motivi di compatibilità | sono state 
segnalate sul N,3L Per ulteriori intemuiitortU 
comunque, è possibile telefonare in Redazione 
(02/8467348 1 chiedendo dì Mietete Maggi* 




Locate cursor 
(21107/21156) 

Nel Baste del Commodore 64 man* 
ca stranamente una panico la re istru- 
zione, molto importante per la ge- 
stione della grafica nello schermo in 
bassa risoluzione. Alludiamo alla fa- 
migerata PRIMI AT. che permette dì 
situare il cursore sullo schermo alta 
posizione indicala dai due parametri 
specificati dall’utente. 

Sfruttando opportuname n te questa 
routine si possono creare divertenti 
videate grafiche senza ricorrere al- 
l'alta risoluzione, oppure creare ta- 
belle, grafici cd addirittura studi di 
funzioni con una risoluzione di 25 
per 40 caratteri, spesso più che suffi- 
cienti per i nostri scopi. 

In pratica, la routine in Linguaggio 
Macchina che viene presentata è 
molto semplice (ed anche molto rapi- 
da da digitare!). 

Ci permettiamo di suggerire al let- 
tore, in caso di utilizzo in program- 
ma Basic, di specificare alLinizio una 
variabile il cui nome sia oculatamen- 
te scelto con l'indirizzo di partenza 
della stessa routine, in modo che poi 
la successiva interpretazione del pro- 
gramma in questione non sìa irrime- 
diabilmente ostacolata da stranissi- 
me SYS, 

Pe r cse nipio* supponendo di ri loca- 
re la routine a partire da 2 1 ! 117 (come 
da noi suggerito), si potrebbe inizia- 
lizzare il programma con: 

LOCATE =21 107 

La sintassi di questa nuova "istruzio- 
ne'’ c molto semplice, non ricorrendo 
a nessuna PGKE preliminare. Biso- 
gna solo richiamare la routine, fa- 
cendo seguire ti rutto dai valori della 
posizione dei cursore, separati da 
virgole. 

Volendo posizionare il cursore nel- 
l angolo in alto a sinistra dello scher- 
mo (0,0), non dovremo tare altro 
che digitare: 

SYS LOCATE, 0,0 

1 due parametri riguardano rispetti- 
vamente la posizione orizzontale e 
quella verticale, o meglio le coordi- 
nate in ascissa e quelle in ordinata. 

Fatto abbasta nza interessante, i pa- 


ra metri possono essere specificati 
anche con variabili, quindi hi llessi- 
hilità nell'uso risulta notevole. 


1000 PRINTCHRSC1473 “LOCATE CORSO 
R f PRIMI RIV P ;PRHMT 
1010 PRIMT M SY5 XXXX , X , V - ; PRIMI 
1020 PRINT "POSIZIONA IL CUR5ÙRE 
SU UlDED IN BASSO R15HLUZI0 
ME" 

1030 PRINT ; PRINT M 0<X*24 " ; PRIMI "U 
< Y< 3 £J" 

1040 RETURN 

1050 DATA 032, 115 , 000,032, 13H, 17 
3,032 t 2 47. IBJ , IBS 
10B0 DATA 021 , E0S h 032, ltìb.020, 07 
2,032,253,174,032 
1070 DATA 1 30 , 1 73 , 0 32 1 24 7 , 1 B3 , 15 
5.021,200,016. 155 
ltìtìtì CAIA 020, 104 . 150, 152 , 040 h 17 
£,000, £54 .025, 170 
1050 DATA 004,032,240, 055 , 05b, lb 
2,015,076 , 05S, 1G4 
1100 DATA -1,5707 


10 PR1NTCHRSC 147) ; FRINÌ ,p D [tlQST 
RAJIUO; LOCATE CURHHH " 

20 X-21107:HEN INDIRIZZO SU66 
ERI IO SU C.C,C + 

30 SVS21 107 , 12.7: PRINT 'ECCO QU 
I IL CURSORE " 


Beep 

(21 157/21260) 

Questa routine consente di produr- 
re un ‘Beep’’ sonoro di durata e fre- 
quenza desiderate. Grazie al poten- 
tissimo S1D (Sound Interface Devi- 
ce) contenuto nel Commodore 64. ge- 
nerare suoni risulta semplice, anche 
se non semplicissimo 

Come tutti certamente sapranno* 
per produrre una determinata nota 
bisogna selezionare la Forma d'onda, 
il volume, rADSR(Artak, Decay, Su- 
stain. Release), i filtri, lì tutto Iramite 
POECE, che non sempre risultano di 
immediata comprensione. 

Per ovviare a questo inconveniente, 
e ritenendo che non sempre è indi- 
spensabile assegnare sofisticate spe- 
cificherei un segnale acustico, abbia- 
mo pensato di creare una routine 
che, molto brutalmente, genera un 
beep. 

E’ comunque possibile controllar- 
ne la frequenza tramite un parame- 
tro che viene "passato" con la chia- 
mata. mentre tramite un altro si de- 
termina la durata della nota gene- 
rata. 

Anche in questo caso consigliamo 
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di attribuire ad una variabile la loca- 
zione di inizio della mutine, per evi* 
tare con fusioni in programmi Basic 
che la utilizzano La sintassi è la se- 
guente: 

SYS B E El\ Du rata, F req. 

La durata à espressa in decimi di 


secondo, mentre per ottenere la fre- 
quenza esalta in Hertz bisogna mol- 
tiplicare il parametro della frequen- 
za per una costante: 

Hertz =0,06097 4 Freq 

Sia la durata che la frequenza pos- 
sono arrivare ad un valore massimo 


dì 65535* 

Nel caso si volesse disasse mhlare il 
programmino, è opportuno avere a 
portata di mano In Guida al Sistema 
Operativo, dal momento che si fa uso 
abbondante di mutine della ROM. 
per semplificare e ridurre drastica- 
mente il numero dì istruzioni. 


1000 PRINTCHRSt 1473 *'BEEP : ESEMPI 
□ D 1 USO " : PR I NT 

1010 PR I NT "SYS XXXX, Y, Z”: PRINT 
1020 PRIMI ” Y“OURATA SUONO IN DEC 
IMI DI SEC.” 

1030 PRINT”Z-FREQUEN2A <HZ)*0,06 
097": FRINÌ 

1040 PR I NT ”0<Y< 65536” : PRINT”0<2< 
65535” 

1050 RETURN 

1060 DATA 169,000,141,004,212,14 
1 , 011,212, 141 ,010 
1070 DATA 212,169,015,141,024,21 
2, 169 , 000 , 141 , 023 
1060 DATA 212,169,000,141,005,21 
2, 169,240, 141 ,006 


10 PRINTCHRSC 147 > ”D I MOSTRATI UO 
BEEP 11 : PR I NT 

20 X“£! 157 : REM INDIRIZZO SUL36 
ERI IO SU C.C.C, 


1090 DATO 518,038,115,000,038,13 
0, 173,038,847, 103 
1100 DATA 155,080,078, 165,081 ,07 
8,038,853, 174,038 
1110 DATA 138, 173,038, 847, 1B3, 10 
4,133,096,104,133 
1180 DATA 095,005,086,840,033,16 
5,080, 155,081 , 141 
1130 DATA 000.818,141,001,818,16 
9,017, 141 ,004,818 
1140 DATA 038, 179, 83B, 155,095, 19 
8,095, 170,808,846 
1150 DATA 198,096,155,096,801,85 
5,808,838, 169,000 
1160 DATA 141 ,004,818,096,-1 , 187 
67 


30 SYS21 157 , 800 , 300 
40 PR I NT "DURATA- "800 "FREQUENZA 
-”300” 


Mappa della memoria 
dì Nuovo Sistema 

iMtnni delle rmitin* puhhlrgmo 

Il primo valore milieu Hndirizzu di par- 
tenza (coiiicidente con la SYS da un par- 
ure), mentre, d secondo, rulli ma locuzio- 
ne con tener. Ir lulnmo dato, 

Il numero fra parentesi, invece, si ri feri 
scc al numero di t t < m vili sono siili: 
pubblicate le routine stesse. 

20000/21»! I GoTu Calcolalo CJ i > 
GoSufc c abolito |31> 
20050/20120 Inurp AS 01) 
20129/2QIU* Cambia colore (31) 
20189/20145 Scroti Carattere (.11) 
20244/20102 ( ancella carati 01) 
20303/20445 (.oStih label (12 1 
20446/20542 GoTo label (.1 1) 
20503/20506 H est ore lineu, (33) 
20597/10*02 l>isli Tool (33) 
20*83/10775 Director* (33) 

20774/2015* Scroti Ha s (34) 
20*59/20914 l)eek 04) 

209(5/20952 Duke 04) 

(Le routine di questo numero dono opera 
di Simonc Bettola) 
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II “vero” 

Linguaggio Macchina 


Un nuovo approccio a! 
cervello del popolare computer 



del Basic c decide di studiare un lin- 
guaggio di più vasta portata, si trova 
in ve viabilmente attratto dal lin- 
guaggio macchina dal momento che 
è immediata me me disponibile gra- 
zie alle stesse istruzioni Basic PEEJC 
POKE e SYS. 

Sul mercato, del resto, si trovano 
numerosi Tool che vanno considerati 
alla stregua di "filtri’’ ira ('utilizzato- 
re ed il microprocessore allo scopo di 
facilitare la programmazione del 
calcolatore. 

Questi Tool* dì norma, si dividono 
in due categorìe fondamentali: 

* Semplici Monitor, vale a dire pro- 
grammi che visuali/ za no, quasi sem- 
pre in forma esadecimale, il contenu- 
to della memoria e consentono mo- 
difiche, trascrizioni di blocchi, regi- 


strazioni, lanci eccetera. 

• Assembler; Disassembler che con- 
sentono di programmare utilizzando 
codici mnemonici di presunta tacile 
interpretazione. 

i più moderni Tool contengono sia 
Monitor che sezioni Assembler. 

Ma è proprio vero che questi Tool 
aiutano il program malore'/ Siamo 
realmente convinti che un micropro- 
cessore può esser programmato solo 
in codice esadecimale oppure ricor- 
rendo ai codici mnemonici? 

La risposta, ovviamente, è negativa 
per Armando Caia/ zo. autore del vo- 
lume "Il vero Linguaggio Macchina 
del Commodore M 

Sua opinione e che. per imparare 
realmente la vera lingua del compu- 
ter* è su linciente limitarsi a conoscere 
i 151 codici macchina scritti, tra (al- 


tro, ricorrendo alla consueta notazio- 
ne decimale. 

In effetti nelle quasi 400 pagine del 
volume citato, rum compare una sola 
volta la “traduzione esadecimale di 
un codice (tranne che per paragoni 
in varie tabelle I né viene proposta la 
digitazione di un Tool* nè si ricorre a 
codici mnemonici. 

Il libro, dunque, affronta l'argo- 
mento ricorrendo alle sole istruzioni 
Read,. Data per introdurre j codici 
macchina. Centinaia sono gli esempi 
riportali con applicazioni a tutte le 
potenzialità del popolare computer 
visualizzazione di messaggi su scher- 
mo* musica, spritc eccetera. Ogni 
nuova istruzione affrontata viene ìm- 
mediatamente tradotta in mini pro- 
gramma di facilissimi! digitazione. 

Le appendici, manco a dirlo, conti- 
nuano ad utilizzare esclusivamente 
il codice decimale per illustrare in 
dettaglio le 151 istruzioni, le routine 
delle Rom, le tecniche di liitermpi, 
fuso dei registri di staio e tutto ciò, in- 
samma* che riguarda da vicino il mi* 
ero processo re del Commodore 64, 

\ ?n volume, quindi, che affronta in 
modo originale e unico u n argomen- 
to che tanto interesse suscita nell'u- 
tente che. stanco del Basic, desidera 
dedicarsi a qualcosa di più impegna- 
tivo senza impegnarsi,,, troppo! 

A, Calino 

Il vera Li lign aggi ■* M acchiusi 

drl ( dim >tu ninfe 64 

Soc, Ed. “1 .inguai* gin Ma collii Ma'* 

C.*o Garibaldi, 95 
82 tUtì Re ne vento 
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Programma: Uomo 


Un'avventura appassionante, delia nota 

collana “Urania", 

che si svolge nel mondo dei computer 


dì Vle^ndm di' Simon« 



è piaciuto questo libro di fan- 
tascienza che ho letto nei momenti di 
ozio estiva (è uscito m edicola, infatti, 
a metà agosto). 

tì li autori dimostrano di avere una 
note iole t.mlasia che limai u non ec- 
cede nelle solite esagerazioni tipiche 
degli scrittori di "Science fiction 

Sicuramente hanno letto qualcosa 
di psicologia (soprattutto perciò che 
riguarda il mondo dei sogni), posseg- 
gono (o hanno visto realmente fun- 
zionare) un personal computer, co- 
noscono i problemi delle proiezioni 
del software e sono aggiornati sulle 
possibilità future di collegamenti tra 
cervelli elettronici e cervelli umani. 
Per quanto riguarda quest'ultimo ar- 
gomento. che al giorno d’oggi è anco- 
ra a livelli poco piu che teorici, gli au- 
(ori, dignitosamente, preferiscono 
sfociare nella fervida fantasìa piutto- 
sto che rendere credibili apparec- 
chiature che non è ancora possibile 
prevedere nel loro aspetto finale (se 
mai verranno costruite!). 

Per quanto riguarda il resto, la vi- 
cenda, recante data 1999, si snoda a- 
vendo come cornice strumenti infor- 
matici che già sono attualmente di- 
sponibili (collegamenti tra compu- 
ter. reti locali e remote, controlli com- 
puterizzali anche mediante termina- 
li portatili) o. comunque, ‘"credibili", 
come camion e convogli ferroviari 
privi di conducenti "umani" e guidati 
esclusivamente da calcolatori. 

Pur se di sfuggita, il lettore è invita- 
to a soffermarsi sull'Impiego legale 
delle banche dati sui cittadini, pro- 
blema che. attualmente, è dibattuto 
perfino in sede politica e sindacale. 


Per ciò che riguarda la trama, dire- 
mo solo che il protagonista del ro- 
manzo un bel giorno si sveglia con 
un vuoto nella memoria che vuole, 
ovviamente, colmare al più presto; 
nelle sue indagi ni si accorge di posse- 
dere una singolare prerogativa: se si 
trova nei pressi di un calcolatore, è in 
grado di introdursi mentalmente nel 
suo 'bus’ c rendersi conto delle ope- 
razioni che compie. 

Non continuiamo, ovviamente, nella 
descrizione anche perchè il romanzo 
si tinge di giallo con consueta sorpre- 
sa finale. 


Siamo sicuri che i lettori trovino 
quantomeno "simpatica 1 l'iniziativa 
dì affrontare temi che. pur non trat- 
tando argomenti strettamente legati 
ai computer Commodore, parlino 
comunque del mondo dell’ informa- 
tica nel suo significalo più vasto che 
comprende, diamine!, anche mo- 
menti dì pausa... 

R.ZfU/m F-Saherhagcn 
"Fragra mimi: l omo 11 
tinnii* N.U12 1 * 

Mondadori fditoré 
I.JOOO 
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n ciclopedia 
di routine 

a cura dì A Irtsundra dr Simonr 


14900 (ancella finestre schermo 
(Coni madore 64 ) 


Questa routine cancella uni* porzione rettangolare, di 
dimensioni p re rissate, in una qualunque zona dello 
schermo (che si presuppone nella posizione "dcfault a 
partire da 1024). 

Prima di richiamarla devono essere assegnati alle va- 
riabili \l e \2, rispettivamente, il valore- schermo del- 
l’angolo superiore sinistro della finestra e quello deb 
l'angolo inferiore desino: ni tal modo viene determinala 
sia la dimensione della finestra die la sua posizione. 

Ad esempio; XI 1401, X2- 1606 cancella una fine- 
stra quadrata al centro dello schermo; XI M124, 
X2 150.1 cancella Unterà metà superiore, e cosi via. 

Se i due valori non sono coerenti (se il secondo non si 
trova a destra e in basso rispetto al primo) la minine 
non viene eseguita e in X0$ sarà contenuto il messaggio 
"ERIT. 

Il fu n/iona mento è basato sulla creazione e stampa 
ripetuta di una stringa formata da un adegualo numero 
di spazi, formattando la stampa in funzione dei para- 
metri assegnati alfinizio. 

Naturai mente, se in seguilo volete scrivere nella fine- 
stra cosi creata, dovrete usa re un’opportuna routine di 
posizionamento de! cursore. 

100 REH ESEHPIO 0 'USO 
110 REH CANCELLA UNA F ì NE3TRA 
1£0 REH IN QUALUNQUE PUNTO DELL 
□ SCHERHO 

130 REM SOLO PER C-64 
135 : 

140 FRI NTCHR3K 147 1 ”UALQR I LQCAZ 
IONI SCHERNO 

150 FRINISCANOGLI : SUPERIORE 51 
N ISTRO 1 INFERIORE DESTRO;) 
150 FRINÌ: PRINT; INPUT XI „ Xd 
170 PRINTCHRSC147) ; r F0R X-l T0 
983: PRINT"X"; : NEXT 
180 GOSUB 14800 
180 GEI A$:IF A$- J>,J THEN 180 
£00 GOTO 140 
£10 : 

8888 END 



14800 X0S fcMW :XlS-"" : POR X3-i TG d 
4; Xl$-Xl$ + CHRa>C 17J :NEX f : X1S 
-CHRS(18)+XlSi 

14805 IF Xl<10£4 OR Xl>1883 DR Xd 
<1054 OR XE>1903 THEN 
ERR* : RETURN 

14810 X3-INIC CXl-10a4>/40I : Y3-X1- 
40*X3“*10£4 

14315 X4*INI(.CXd-10d4?/40) : Y4“Xd- 
40*X4“10£4 

143£0 IF X3> X4 OR Y3>Y4 THEN X03>- 
”ERR*' : RETURN 

14385 XSì- ” 11 : FQR X-0 TU CY4-Y3I:Xi 
-XS+” 11 : NEXT 

14830 FOR X-X3 IO X4 : PRI NTLEf- 1 SC X 
1$ , X+l JSPC C Y3 ) X$ : NEXT : RE TUR 
N 

14880 R EH UARI ABILI: X,X1 ,Xa»X3 v X 
4 t Y3 t Y4 t XS 

1438E REH CANCELLA UNA PORZIUNE 

14884 REFI RETTANGOLARE DELLO SCHE 
RhO- 

14336 REH X1-ANG0L0 SUPERIORE SIN 
I SIRO 

1433B REFI XE-ANGOLG INFERIORE QES 
TRO 

14838 REM NOtlE; CANCELLA FINESTRE 
SCHERHO 


15000 Frammenta- schermo 


(t uni inodore 64) 

Questa routine in J.m. propone, come elegante alter- 
nativa al solito X lear”, una frammenta/ ione dello 
schermo in tanti quadratini colorati 
La routine 'spara' sullo schermo, in maniera casuu- 
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II*. degli spa/i-reverse colorati. por una durata di circa 
duo secondi (di regola suHìcicnti a riempire lo scher- 
mo!. e viene conclusa ita un normale '( lear”. 

Seia zona di memoria suggerita (6XO-755)|<isse uliliz- 
/aia diversa melile, la routine può essere rilocata sem- 
plicemente ponendo la nuova loca/inuedi ini/ioal po- 
sto del (ittlt" nella riga 15045, e modificando i 
telativi SYS. 

100 REM ESEMPIO D'USO 
110 REM FRAMMENTA-SCHEKMO 
120 REM SOLO PER C-64 

125 : 

126 REM BY ROBERTO MORISSI 

127 : 

130 PR INTCHHSC 147 ) ” PRIMA SCHERM 
AIA (NERO ) 

140 GOSUB 15000: 5YS6B0.0 
150 PR INI "SECONDA SCHERMATA C RO 
SSO)”: POR X-l IO 2E3; NEXT 
160 SYS680 , 2 

170 PRINT "TERZA SCHERMATA USI AL 
LD ) ” : FOR X-l TD 2E3:NEXT 
1B0 SYS680.7 
190 PRINT” ... .ECCETERA I 
200 : 

9935 END 

15000 X3S- ”032241 1(331692551410162 
121691281410192121690000322 
19255 17302721 2133" 

15010 X9S-X94+ ”251173027212074074 
074074074074009004133252160 
000169160145251” 

15020 X9S-X94+ ”165252024105212133 
252130145251234234234234234 
234234234036162” 

15030 X9S-X9S+"016210140015212140 
010212169147076210255” 

15035 X7-0:XB-0 

15040 FOR X-l IO LEN( X9S) STEP 3: 

XS-UALCMI0SCX9S, X, 3)) 

15045 POKE 6B0+XB, X9: XB-XB+1 : X7-X 
7+X9 : NEXT 

15050 IF X7<> 11093 THEN PRINT ”ERR 
ORE”: END 
15055 RETURN 

15090 REM VARIABILI: X.X9S.X7.X8, 
X9 

15092 REM ESEGUE IL CLEAR DELLO 5 
CHERMO 

15094 REM IN FRAMMENTI COLORATI 
15099 REM NOME: FRAMMENTA-SCHERMO 


15100 Lampeggio righe schermo 


Questa brevissima routine la lampeggiare sullo 
schermo messaggi di una o più righe, oppure, alternati- 
vamente (iti controfase), righe diverse, o addi rimira 
parti diverse di una medesima riga. 

La frequenza del lampeggio viene prefissata asse- 
gnando alta variabile XI valori da 0 a 7: più basso è il 
valore, più rapido è il lampeggio. 

I a mutine viene richiamata subito prima ili stani; tare 
il messaggio. Essa definisce alcune variabili-stringa 
(XIS. X2S, X3S, X4$| che chiamerei “variabili flip- 
flop": il loro valore., infatti, dipende dal contentilo i- 
stantaneo del registro interiore del clock (162). 

Se» per esempio. XI è fissata a 4, XIS sarà uguale a 
Kvs" se il contenuto di tale registro div iso 2 .il la quarta 
è dispari, a RvofT. invece, se é pari, 

\2S assume gli stessi valori, ma invertiti. 

X3$ e X4$, analogamente, saranno posti ugnali a 
"bianco” "blu" o viceversa. 


Queste variabili vengono inserite nei messaggio e ne 
formattano la stampa, alternativamente, in “rvs" "rvof- 
f oppure “bianco" "blu" (se quesfultimo è il colore del 
fondo, il messaggio scompare). 

Il GET di attesa ripete la stampa purché si abbia fac- 
eorte/,/.a di rimandare ogni volta il cursore nella posi- 
zione iniziale: il modo più semplice è quello di aggiun- 
gere all'ultima riga lami “cursof-lip ' (CMR$(157)) 
quante sono le righe da ripetere. 

I.a fantasia potrà suggerire molte altre varianti e ap- 
plica/ioni delle variabili flip-flop. 


100 REM ESEMPIO U‘U50 
110 REM MESSAGGI LAMPEGGIANTI 
120 REM QUALSIASI COMPUTER 
130 PRINTCHRSC 147) ; : INPUT “FKEQ 
UENZA (0-7)”; XI 
140 PRINT: PRINT 

150 GOSUB 15100: PRINTX1S”LAMPEG 
GIU NORMALE/REUERSE” 

160 PRINTX1S”L0 STESSO ”X2S ” ALT 
ERNATO "CHRSC 145 )CHRSt 145 ) 
170 GET AS:IF A$-”” THEN 150 
1B0 PRINT:PRINT: PRINT: PRINT 
190 GOSUB 15100: PR I NTX3S "LAMPEG 
G1D APPARE/ SCOMPARE" 

200 PRINTX3S ”L0 3TESSU”X4$" ALT 
ERNAT0”CHRSC145)CHRSt 146) 
210 GET A# : IF A*-"” THEN 190 
220 PRINT: FRI NT: PRINT "FINE DEMO 

ft 

230 : 

9999 END 

15100 X1S-CHRSC 1B+12B* £ t PEEK( 162) 
/2TX1) ANO 1)) 
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15110 X0S-CHKS(146-100*C CPEEKdbB 
)/0TXl> AND 1)) 

15100 X3S-CHKS 1 5+06* C ( PEL* C 1 62 ) / 0 
TX1) AND 11) 

15130 X4S-CHRSC31-06*( C PEEKClbE)/ 
ET XI) AND 1)1 
15140 RETURN 

15150 REA UARIABILI : XI , XI*. X0S.X3 
S,X4S 

15190 REM FA LAMPEGGIARE I MESSAG 
Gl 

15134 REM SULLO SCHERMO, IN DUE M 
ODI 

1519E REM OIUERSI 

1519B REM XI -FREQUENZA LAMPEGGIO 

(0-7) 

15199 REM LAMPEGGIO RIGHE SCHERMO 

6 

5010(1 Esame directory del disco 

Sul N.lhdi C.C.C. i già stata pubblicata una routine, 
in l.tn, clic svolge la stessa (unzione. 

La riproponiamo, iti puro Basic, per consentire ai lei- 
tori di studiarlo meglio. 

La brevissima routine non ha bisogno di commenti: è 
sufficiente richiamarla per avere sullo schermo la di- 
rectory del disco presente in quel momento nel drive, 
senza interferire in alcun modo con il programma 
in memoria. 

Tenete presente che ail'iniaio della routine {righe 
s«l no- >( il IO) vengono chiusi Ami i file che fossero e- 
ventual mente aperti, onde evitare un "File Open 
Errori'. 

100 REM ESEMPIO D*USQ 

110 REM DIRECTORY DEL DISCO 


100 REM QUALSIASI COMPUTER 
130 : 

150 PR lNTCHRSl 147 ) ; 

160 PRINT" INSERISCI UN DISCO, 
170 PHINT’’PDI PREMI UN TASTO 
100 GET AS:IF fi*-»*' THEN 100 
100 PK INTCHR* C 147 ) ”D I PECI URY DE 
L DISCO ATTUALE: M : GUSUB 501 
00: GOTO 160 
000 : 

9999 END 

50100 IF PEEKt 150)-0 THEN 50115 
50105 FOR X-0 TO 9: Y-PEEKC601+X) : 

IF Y THEN CLDSE Y 
50110 NEXT 

50115 OPEN 15, B, 15, ”I“:OPEN 1,0,0 
, ”S”: YS-CHRS(0) 

50100 GET ttl.XS.XS 

50105 GET #1,XS,XS,X1S,X0S:X-ST: I 
F X-0 THEN PR 1NTASCC X15+YS J 
+056*ASCC xes+ys > -, 

50130 IF ST THEN PRINT :CLOSL 1 : CL 
□SE 15: RETURN 

50140 GET ttl,XS;IF X*-"” THEN PRI 
NT: GOTO 50105 
50150 PRINTXS; :GOTO 50140 
50190 REM DAR I AB ILI: XS,YS,X1S,X0 
S|X, Y 

50190 REM LEGGE E UI SU AL IZZA 
50194 REM IL DIRECTORY DEL DISCO 
50196 REM SENZA 50URAPP0RSI 
50190 REM AL PROGRAMMA IN MEMORIA 
S01 99 REM DIRECTORY DEL DISCO 

Roberto Morava 
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ASSISTENZA HARDWARE 

(8,30-12, 15-18.30; sabato 9-12) 

riparazione 

microcomputer 

- espansioni 5 12Kbytes per GL 

- trasformai. MG| (vers.il.) 

- lotte le soluzioni hardware 


contro autorizzalo aa aia lenza 
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6394 1 RLM 

63442 RLM 

63443 REM 
63944 RLM 

63443 REM 
63446 RLM 
63947 REM 
6 3448 RF M 
63449 REM 
63950 RLM 
63451 REM 

63952 REM 

63953 REM 

63954 REM 

63955 REM 

63956 REM 

63957 REM 

63958 REM 

63959 REM 

63960 REM 
63% 1 REM 
63962 REM 
63%3 REM 
63%4 REM 
63%5 RLM 
63966 REM 
63%7 REM 
6396» REM 
63%8 REM 

63969 REM 

63970 REM 

63971 REM 

63472 REM 

63473 REM 

63474 REM 

63475 REM 
63976 REM 
63477 REM 
63978 REM 
63479 REM 
63980 REM 
63481 REM 

63982 REM 

63983 REM 

63984 REM 

63985 REM 

63986 REM 

63987 REM 

63988 REM 
63489 REM 
63990 REM 
6349 i REM 

63992 REM 

63993 REM 
63494 REM 

63995 REM 

63996 REM 

63497 REM 

63498 REM 

63444 REM 


Elenco delle routine pubMHite 


14800 SOSTITUÌ Si h STRINGHI (34) 

147<Kì SI ITTA STRINGHE (341 
1460(1 RUOTA STRINGHE (34) 

10500 INPUT PROGRAMMABILE (34) 

14500 SCROLL SOLO TESTO 133) 

14400 S PRES E MULTIUSO (33) 

! 4300 ZOOM ESADECIMALE (33) 

14200 VIDEO OROLOGIO (33) 

LU0Q FUNZIONI INVERSI (32) 

13200 CENTRATOR E MESSAGGI (32s 
14100 HNESTKJ Di TESTO (32) 

14000 GESTIONE NOME DISTO (32) 

13400 CARICA SALVA PAG. VIDEO (31) 

13800 MESSAGGI IN I RUM (3I| 

(3700 BIT IMAGI- MPS/8()3(3l) 

13600 OR ESCLUSIVO (31) 

135(81 COMANDI FUORI PROGRAMMA (3 lì 
] 34WKJ i jni;l BASSA RISOLUZIONE ( 31 ) 
13300 ELABORA/IONL SIRINGHI. (31) 
13200 CENTRATURA FRASE (32) 

13100 SCEI <A MENU JOYSTICK (30) 

13000 SCELTA MENU CURSORE (30) 

12900 SCRITTA LAMPEGGIANTE (29) 

128(8) BORDO VIDEO TECHNICOLOR (29) 
12700 FILE MEMORIA RAM (29) 

126(8) TEXT COPY (MPS 803) (29) 

125(8) CAMBIA COLORE PAG TESTO (24) 
124(8) PRINT USINO (31) 

124(8) FRINÌ USINO (29) 

12300 MC.D. c nu m (29) 

50500 VISI 'All ZZA FILE (28 1 
30400 LEGGE FILE RELATIVI (28) 

50300 SCRIVI' SU FILE RELATIVI (28) 

50200 CREA FILE RELAI VI (28) 

50000 LEGGE BLOCCHI LIBERI (28) 

12200 NI 'MIRI l ONGRUI (28) 

12100 PROTEZIONE SOFTWARE (28) 

I2IKJ0 KOALA (27) 

1 1900 SCAMBIA PAGINA VIDEO (27) 

1 1800 SALVA RAM (27) 

11700 CALCOLATRICE (27) 

11600 SCOMPOSI/ SILLABE (27) 

1 1 500 CAR.HI-RES (27) 

Il 400 ISTOCiRAMMl (27) 

50100 ESAME DIRECTORY (26) 

1 1300 FUNZ.1NV IPERBOLICHE (26) 

1 1200 FUNZ.INV. TR1GONOM, (26) 

Il m FUNZIONI INVERSE (26) 

11000 FUNZIONI IPERBOLICHE (26 1 
10900 CONVERSIONE DLC-ESA (26| 

10800 CON I ROLLO DATA (25i 
10700 IMPULSI SONORI (25) 

10600 RE VERSE SCHERMO (25) 

10500 INPlfr CONTROLLATO (25) 

10400 INCOLONNAMI N FU VIRGOLA (25) 
50000 N BLOCKS FREEi DISCO) (24) 

10300 INPirr & CONTR DEFAULT (24) 

10200 ESTRAZ PAROLA DA FRASE (24) 
10100 CAMBIA COLBOR DO/FONDO (24) 
10000 CORNICE POLICROMA (24) 




LUTILE 

C 128 


Autoboot per C/128 


Come mandare in esecuzione 
un programma presente su disco 
senza Load nè Run 


di M. Maggi c ILI ni api cch ioni 



(Quando si inserisce nel drive il di- 
schetto del CP/M, incluso nel Ih con- 
fezione del C/128* inizia automatica- 
mente a girare caricando e mandan- 
do in esecuzione il programma 
stesso. 

Ci siamo chiesti se questa caratteri- 
stica (caricamento e lancio automati- 
ci) fosse esclusiva del CP/M oppure 
potesse essere sfruttata anche con 
nostri programmi. 

Siamo andati a spulciare tutti i ma- 
nuali che normalmente vengono for- 
niti dalla Commodore, ma non ab- 
biamo ovviamente (!) trovato niente 
che facesse al caso nostro. 

Come spesso succede in questi casi, 


la sperimentazione è Tunica maniera 
per scoprire informazioni particolari 
non riportate sui manuali. 

Siamo quindi andati a curiosare 
sulle tracce c sui settori del disco del 
CP/M con un analizzatore dì tracce 
del C-64che permette di visualizzare 
il contenuto dei settori del disco. 

La prima cosa che abbiamo notato 
è che sul primo settore del disco è 
presente la sequenza dei caratteri 
TBM’\ seguita da alcuni numeri. 

Come qualche lettore ricorderà, nel 
C-b4 il sistema di autostart delle car- 
tridge si basa sull’uso della stessa se- 
quenza, ovviamente allocata in me- 
moria Rom e non su disco. 


Abbiamo però pensato che fosse 
tradizione della Commodore usare 
le proprie iniziali per segnalare al si- 
stema la presenza di un autostart e. 
supportati da tale convinzione, ne 
abbiamo poi avuto conierma. 

La comodila di un caricamento au- 
tomatico (autoboot) è evidente; a llì- 
da lido il programma ad una persomi 
inesperta, la mettiamo in condizione 
di utilizzarlo senza doversi preoccu- 
pare di "trafficare” con directory e o 
vari comandi di caricamento* con 
annesse possibilità di errori che, per 
un nuovo utente del computer, pos- 
sono trasformarsi in difficoltà insor- 
montabili* 
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Chiaramente la possibilità di far 
partire auto ma tic a mente i program- 
mi potrà far comodo anche all utente 
esperto, che aggiungerà in tal modo 
un tocco di professionalità al proprio 
softwa re. 

Spieghiamo qui di seguilo il fun- 
zionamento di questo particolare 
autostart. 


Come funziona AutoBoot 

All'accensione del computer, il Siste- 
ma Operativo (SAX) legge i byte con- 
tenuti nel primo settore del disco 
{Traccia I Settore G> per controllare 
se è presente, c metto, la sequenza dei 
caratteri "CBM", 

In caso negativo (drive spento o di- 
schetto non predisposto) il sistema e- 
segue le normali operazioni riguar- 
danti fmizializzazione standard 

Questo è il motivo del "ritardo’ tra 
l’accensione del C/Ì28e la comparsa 
della scritta “READY". 

Se. invece, sul dischetto si trova La 
sequenza, il controllo passa ad una 
routine die auto malica mente carica 
ed esegue il programma specificato 
sul settore posto di seguito alla 
slessa sequenza. 

Per utilizzare questa caraneristica 
dobbiamo predisporre un dischetto 
in modo da fargli contenere i dati ne- 
cessari al Root, 

El programmino che presentiamo 
serve appunto a questo scopo. 


Come utilizzare il programma 

Salvate il programma di queste pa- 
gine su un dischetto, formattatene Li- 
no nuovo per mezzo del comando 
HEÀDER “Nome Disco"! D (o ana- 
loghi \ e, a formattazione avvenuta, 
date il RUN al programma. 

Il drive inizierà a girare e in pochi 
secondi il dischetto sarà predisposto 
per fautostart. 

Se infatti richiedete la directory do- 
po le operazioni descritte, potrete no- 
tare che, rispetto ad un disco normal- 
mente formattato, manca un blocco, 
che è stato occupato, appunto, dalla 
sequenza necessaria all'auto start. 

Adesso caricate un qualsiasi vostro 
programma e salvatelo sotto il nome 
di “LOADER (c solo con questo no- 
me!) sul disco “trattato" E’ intuitivo 
che se volete assegnare un nome di- 
verso al programma da lanciare, sarà 
necessario cambiare, nel listato, il 
DATA corrispondente (vedi ultime 
righe del programma dì queste pa- 
gine). 

Per provare che tutto è in ordine, 
spegnete il computare riaccendetelo 
in modo, ovviamente, 128, 

Se avete seguito le semplici istru- 
zioni, il programma verrà caricalo e 
partirà da solo. 

Se. invece, volete evitare il lancio 
automatico, sarà sufficiente mante- 
nere il drive vuoto al momento del- 
l'accensione (o del Reset). 


Nel digitare nghe di programma ba- 
sic che contengono istruzioni DATA, 
è piuttosto facile incorrere in errori di 
digitazione Supponiamo che un'ipo- 
tetica linea basic numerata eoo 1200 
debba contenere i tre valori: 123, 
456, 769 Ecco alcuni esempi di erro* 
rr più frequentemente commessi; 


1200 DATA J 23 .456.789 

C'è una virgola dopo la parola 
"DATA 1 ’ I dati (etti dal computer so- 
no. in questo caso, quattro: 0, 123. 
456, 789 Se, infatti, non figura alcun 
carattere dopo l'istruzione DAT A, au- 
tomaticamente viene assunto il valo- 
re nullo (0) 


1200 DATA 123.456,789, 

In questo caso, dopo il numero 
789, il computer, grazie alla presen- 
za della virgola erroneamente esen- 
ta. ''crede" che ci s*a un altro valore 
e. non trovandolo, lo assume come 
nullo (01. 


1200 DATA 1234. 56. 709 

La virgola è posizionata mate, vate 
a dire dopo il carattere “4" e non 
dopo il carattere “3". Il computer non 
può sapere se >i valore esano è 1 23 
Oppure 1234 e individuare un errore, 
tn questo caso, risulta piuttosto 
laborioso 


100 REH AUTOSTART C/1E0 
110 REM E DRIUE 1541 / 1571 
120 REri BY U . COLAR 1 CCH IONI 
130 REM E M. MAGGI 
140 : 

150 PR I NTCHRS C 147 ) ''PROGRAMMA DI 
AUTOSTART PER C-128”; PRINT 
160 PR I NT "ATTENZ 1 ONE ì INSERISCI 
UN DISCO FORMATTATO E PREM 
I UN TASTO" 

170 GEI A$ : I F AS- ,MÌ TH£N 170 
180 PRINT : PRINT 11 STO INIZI AL I ZZA 
NDD IL DISCHETTO 
190 HS- N, CBM M +CHRSt03+CHRSt0O+CH 
«. $ ( 0 > +CHRS C0 ) +CHRS C 0 )+CHRSì t 
0 ) 


200 F0R X-l IO 14: READ A$:HS-H$ 
+GHR3K DEC CA$)):MEXT 
210 READ A$ # B$:H$-HS+A$+CHR$C34 
>+B$+CHR$C 13 J 

220 OPEN 15,B v 15sOPEN 2,6,2,"#" 
230 PRINTttlB, ”B“P”;2;0: PRINTtfE, 
H$ 

240 PRINTtflB, 1;0 
250 PRINT# 15, ”U2 " ; 2 ; 0 ; 1 ;0: CLDSE 
2 : CLDSE 15 

260 PRINT: PRINT: PR INI J, D ISCHETTO 
PRONTO. ” 

270 0ATA A2 , 0A , 36 , 00 , BD , 16 , 0B 
200 DATA 90,49,03, CA , D0 , F7 , 00 
290 DATA ”R /' 

300 DATA "LOADER 11 


30 ' Commodore Computer Club 






PRESENTA 


Cornjttodore 


oftware 


Cover 

Videohas 


t qr Editor ( 7 K) 


Vietnam 


Cove 

r ( wK) 

S « .. . 

B10 li 

nvaaer { 3 

K 

Char 

Editor { s 

1 

K) 


1 

<io 

I 

K) 




i = -“i f; -E "/i ! 

iSs tvi 




de 

nti 

kit 

( 8 K) 


’ 


I 

tal 

llv ' 

< OKI 











Registrate il mio abbonamento annuale a Commodore Computer Club. 


Ho versato oggi stesso il canone di L 35 000 a mezzo c/c postale n a 37952207 intestato 
a: 

Systems Editoriale - VJe Famagosta, 75 - 20142 Milano 

Ho inviato oggi stesso assegno bancario n * 


per l'importo di L. 35.000 intestato a Systems Editoriale 
Si prega di scrivere il proprio nome e l'indirizzo completo in modo chiaro e leggibile. Inviare 
la fotocopia del bollettino dì c/c postale. 



Considerando che i numeri 1 , 2 e 7 sono esauriti, vogliate inviarmi i numeri arretrati 

al prezzo di L. 5 000 cadauno per richieste fino a 4 numeri, o di L. 4,000 cadauno per 

richieste oltre i 4 numeri arretrati, e pereto per un totale di 1. Sono a conoscenza che 

i fascici i suddetti non saranno inviati in contrassegno e, pertanto, ho provveduto oggi stesso 

a versare il canone di L a mezzo c/c postale n. 37952207 intestato a: 

Systems Editoriale - V ie Famagosta, 75 - 20142 Milano 



PICCOLI ANNUNCI 


. i. ■ *. I, _ . - 4 - + t. 4 4.-4 - ► - , - - - - ‘ - r - l^f,. - -- -- - - - -44 - j - - - . Si - ..*fMSs-f.-isssssMHJMS»si - • ■ ' • ■*“ - •• ■ i R- ■ » ■ a. J ■ 


-«■.■■■■■■■■IBI 



CERCO/OFFRO CONSULENZA 


r 1 • - - r r -• t S ■* r ■ f ‘SHii-HMH i ‘ - | i - ns I-H ‘ ' > - ■« -* M MM « * M< ■ i « l s J » ’ >M MI • ■ 


■ ■ i • - irair--»-! »-!r--r . - i.. ... 41 jaisai li * ■ ■* 1. ■• 1- ■ j ■ ■ i ■•■Juana 1 ■ a sai ■ 1 ■ j • ■ 


Il I ■■■■■■Il 1 ■ ■ .1 ■ A ■ n I 1 « I ■ 1 1 ■ r ■ 1 I 1 », ■ I 1 ■ J I 


il r 1 1 1 1 t 1 n 1 11 ^ ■ 1 H ■ ■ 1 r i 1 i ■ i r 1 ^ r 1 ■ 11 ri 1 


uri rei rii HiH !■ J i - !■ ■ + k ■* * * i - HI 


■I 4 - F 



INVIARE IN BUSTA 
CHIUSA E AFFRANCANDO 
SECONDO LE TARIFFE VIGENTI A: 



COMMODORE COMPUTER CLUB 



V.le Famagosta, 75 
20142 Milano 




Personal Computer è la rivista Systems per gli utenti 
Commodore, MSX, Sinclair. 

Non solo tre riviste per Ire diversi utenti: Personal 
Computer è anche unldea nuova per Far comunicare 
tutti gli hobbisti. Personal Computer: 128 kbytes di 
rivista, tutti i mesi in edicola. 

L'abbonamento cumulai voa Commodore Computer 
Club e Personal Computer costa solo L. 60.000 
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NUOVA MAXELL UR 

Una cassetta Low Noise a livello Hi-Fi 


C'era una volta la cassetta adatta ad 
un ceno tipo di utilizzo, alla quale 
non si potevano chiedere prestazioni 
superiori. 

Adesso c'è la UR MAXELL che, gra- 
zie alla sua modernissima tecnologia, 
rivoluziona gli standard* della casset- 
ta low noise portandoli a livelli hi- ti . 
UR significa UNI VERSA L RECOR- 
D1NG, cioè adatta ad ogni tipo di re- 
gistratore, dal portatile alla piastra 
ultrasofisiicata, sempre con la certez- 
za di prestazioni eccellenti, 
fi nastro UR offre un aumento in 
MOL (Maximum Output Level) di 


a 



maxell. 

L arte di registrare. 


1 ,5 dB alle basse frequenze e di 2 dB 
alle alte rispetto alla serie UL. 
L’ulteriore abbassamento del rumo- 
re di fondo offre la gamma dinami- 
ca più ampia della categoria: fino a 
77 dB (a 1 Khz), ottenendo cosi un 
suono chiaro e cristallino senza alcu- 
na distorsione. 

L'involucro della UR è costruito con 
un nuovo polistirene di grande resi- 
stenza che ne assicura una lunga vita 
senza problemi. 

A voi non resta che provare; non re- 
sisterete al fascino, neanche troppo 
discreto, della nuova UR MAXELL. 




